/ Acorn User: China / Acorn User China CD-ROM (UK) (Disc B) / Acorn User China CD-ROM (UK) (Disc B).bin / STUTTGART / FROMUTS / DZAP / !Dzap_!RunImage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 15 f4 3e 21 44 | 7a 61 70 2e 21 52 75 6e |.....>!D|zap.!Run|
|00000010| 49 6d 61 67 65 0d 00 0f | 2d f4 20 43 6f 70 79 72 |Image...|-. Copyr|
|00000020| 69 67 68 74 20 41 72 63 | 68 69 6d 65 64 65 73 20 |ight Arc|himedes |
|00000030| 57 6f 72 6c 64 20 4f 63 | 74 6f 62 65 72 20 31 39 |World Oc|tober 19|
|00000040| 39 31 0d 00 14 17 f2 77 | 69 6d 70 69 6e 69 74 3a |91.....w|impinit:|
|00000050| f2 64 7a 61 70 69 6e 69 | 74 0d 00 1e 0c ee 85 f2 |.dzapini|t.......|
|00000060| 65 72 72 6f 72 0d 00 28 | 2e f5 3a 77 68 61 74 6e |error..(|..:whatn|
|00000070| 65 78 74 25 3d a4 70 6f | 6c 6c 28 30 29 3a f2 61 |ext%=.po|ll(0):.a|
|00000080| 63 74 69 6f 6e 28 77 68 | 61 74 6e 65 78 74 25 29 |ction(wh|atnext%)|
|00000090| 3a fd a3 0d 00 32 05 e0 | 0d 00 3c 05 3a 0d 00 46 |:....2..|..<.:..F|
|000000a0| 3c dd a4 70 6f 6c 6c 28 | 6d 61 73 6b 25 29 3a c8 |<..poll(|mask%):.|
|000000b0| 99 22 57 69 6d 70 5f 50 | 6f 6c 6c 22 2c 6d 61 73 |."Wimp_P|oll",mas|
|000000c0| 6b 25 2c 70 6f 6c 6c 25 | b8 72 65 73 75 6c 74 25 |k%,poll%|.result%|
|000000d0| 3a 3d 72 65 73 75 6c 74 | 25 0d 00 50 05 3a 0d 00 |:=result|%..P.:..|
|000000e0| 5a 14 dd f2 61 63 74 69 | 6f 6e 28 65 76 65 6e 74 |Z...acti|on(event|
|000000f0| 25 29 0d 00 64 0d c8 8e | 65 76 65 6e 74 25 ca 0d |%)..d...|event%..|
|00000100| 00 6e 1c c9 31 3a f2 72 | 65 64 72 61 77 77 69 6e |.n..1:.r|edrawwin|
|00000110| 64 6f 77 28 21 70 6f 6c | 6c 25 29 0d 00 78 23 c9 |dow(!pol|l%)..x#.|
|00000120| 32 3a f2 6f 70 65 6e 77 | 69 6e 64 6f 77 28 21 70 |2:.openw|indow(!p|
|00000130| 6f 6c 6c 25 2c 70 6f 6c | 6c 25 2c 2d 31 29 0d 00 |oll%,pol|l%,-1)..|
|00000140| 82 1b c9 33 3a f2 63 6c | 6f 73 65 77 69 6e 64 6f |...3:.cl|osewindo|
|00000150| 77 28 21 70 6f 6c 6c 25 | 29 0d 00 8c 07 c9 34 3a |w(!poll%|).....4:|
|00000160| 0d 00 96 07 c9 35 3a 0d | 00 a0 18 c9 36 3a f2 6d |.....5:.|....6:.m|
|00000170| 6f 75 73 65 62 75 74 74 | 6f 6e 63 6c 69 63 6b 0d |ousebutt|onclick.|
|00000180| 00 aa 17 c9 37 3a f2 64 | 72 61 67 28 64 72 61 67 |....7:.d|rag(drag|
|00000190| 66 72 6f 6d 25 29 0d 00 | b4 21 c9 38 3a f2 6b 65 |from%)..|.!.8:.ke|
|000001a0| 79 70 72 65 73 73 28 21 | 70 6f 6c 6c 25 2c 70 6f |ypress(!|poll%,po|
|000001b0| 6c 6c 25 21 32 34 29 0d | 00 be 12 c9 39 3a f2 6d |ll%!24).|....9:.m|
|000001c0| 65 6e 75 73 65 6c 65 63 | 74 0d 00 c8 1d c9 31 37 |enuselec|t.....17|
|000001d0| 2c 31 38 3a f2 6d 65 73 | 73 61 67 65 69 6e 28 65 |,18:.mes|sagein(e|
|000001e0| 76 65 6e 74 25 29 0d 00 | d2 05 cb 0d 00 dc 05 e1 |vent%)..|........|
|000001f0| 0d 00 e6 05 3a 0d 00 f0 | 3e dd f2 71 75 69 74 3a |....:...|>..quit:|
|00000200| 24 62 6c 6f 63 6b 25 3d | 22 54 41 53 4b 22 3a c8 |$block%=|"TASK":.|
|00000210| 99 22 57 69 6d 70 5f 43 | 6c 6f 73 65 44 6f 77 6e |."Wimp_C|loseDown|
|00000220| 22 2c 6d 79 74 61 73 6b | 25 2c 21 62 6c 6f 63 6b |",mytask|%,!block|
|00000230| 25 3a e0 0d 00 fa 05 3a | 0d 01 04 29 2a 2a 2a 2a |%:.....:|...)****|
|00000240| 2a 2a 2a 2a 2a 2a 20 57 | 69 6e 64 6f 77 20 72 6f |****** W|indow ro|
|00000250| 75 74 69 6e 65 73 20 2a | 2a 2a 2a 2a 2a 2a 2a 2a |utines *|********|
|00000260| 2a 0d 01 0e 05 3a 0d 01 | 18 7a dd a4 63 72 65 61 |*....:..|.z..crea|
|00000270| 74 65 77 69 6e 64 6f 77 | 28 74 69 74 6c 65 24 2c |tewindow|(title$,|
|00000280| 66 6c 61 67 25 2c 66 67 | 63 6f 6c 25 2c 62 67 63 |flag%,fg|col%,bgc|
|00000290| 6f 6c 25 2c 74 77 61 74 | 78 25 2c 74 77 61 74 79 |ol%,twat|x%,twaty|
|000002a0| 25 2c 76 77 61 62 78 25 | 2c 76 77 61 62 79 25 2c |%,vwabx%|,vwaby%,|
|000002b0| 76 77 61 74 78 25 2c 76 | 77 61 74 79 25 2c 6e 69 |vwatx%,v|waty%,ni|
|000002c0| 63 6f 6e 73 25 2c 69 63 | 6f 6e 66 6c 61 67 25 2c |cons%,ic|onflag%,|
|000002d0| 62 65 68 69 6e 64 25 2c | 73 70 72 69 74 65 25 29 |behind%,|sprite%)|
|000002e0| 0d 01 22 0c ea 68 61 6e | 64 6c 65 25 0d 01 2c 43 |.."..han|dle%..,C|
|000002f0| 21 62 6c 6f 63 6b 25 3d | 76 77 61 62 78 25 3a 62 |!block%=|vwabx%:b|
|00000300| 6c 6f 63 6b 25 21 34 3d | 76 77 61 62 79 25 3a 62 |lock%!4=|vwaby%:b|
|00000310| 6c 6f 63 6b 25 21 38 3d | 76 77 61 74 78 25 3a 62 |lock%!8=|vwatx%:b|
|00000320| 6c 6f 63 6b 25 21 31 32 | 3d 76 77 61 74 79 25 0d |lock%!12|=vwaty%.|
|00000330| 01 36 42 62 6c 6f 63 6b | 25 21 31 36 3d 30 3a 62 |.6Bblock|%!16=0:b|
|00000340| 6c 6f 63 6b 25 21 32 30 | 3d 74 77 61 74 79 25 3a |lock%!20|=twaty%:|
|00000350| 62 6c 6f 63 6b 25 21 32 | 34 3d 62 65 68 69 6e 64 |block%!2|4=behind|
|00000360| 25 3a 62 6c 6f 63 6b 25 | 21 32 38 3d 66 6c 61 67 |%:block%|!28=flag|
|00000370| 25 0d 01 40 3d 62 6c 6f | 63 6b 25 3f 33 32 3d 37 |%..@=blo|ck%?32=7|
|00000380| 3a 62 6c 6f 63 6b 25 3f | 33 33 3d 32 3a 62 6c 6f |:block%?|33=2:blo|
|00000390| 63 6b 25 3f 33 34 3d 66 | 67 63 6f 6c 25 3a 62 6c |ck%?34=f|gcol%:bl|
|000003a0| 6f 63 6b 25 3f 33 35 3d | 62 67 63 6f 6c 25 0d 01 |ock%?35=|bgcol%..|
|000003b0| 4a 34 62 6c 6f 63 6b 25 | 3f 33 36 3d 33 3a 62 6c |J4block%|?36=3:bl|
|000003c0| 6f 63 6b 25 3f 33 37 3d | 31 3a 62 6c 6f 63 6b 25 |ock%?37=|1:block%|
|000003d0| 3f 33 38 3d 31 32 3a 62 | 6c 6f 63 6b 25 3f 33 39 |?38=12:b|lock%?39|
|000003e0| 3d 30 0d 01 54 3d 62 6c | 6f 63 6b 25 21 34 30 3d |=0..T=bl|ock%!40=|
|000003f0| 30 3a 62 6c 6f 63 6b 25 | 21 34 34 3d 30 3a 62 6c |0:block%|!44=0:bl|
|00000400| 6f 63 6b 25 21 34 38 3d | 74 77 61 74 78 25 3a 62 |ock%!48=|twatx%:b|
|00000410| 6c 6f 63 6b 25 21 35 32 | 3d 74 77 61 74 79 25 0d |lock%!52|=twaty%.|
|00000420| 01 5e 43 62 6c 6f 63 6b | 25 21 35 36 3d 26 33 44 |.^Cblock|%!56=&3D|
|00000430| 3a 62 6c 6f 63 6b 25 21 | 36 30 3d 69 63 6f 6e 66 |:block%!|60=iconf|
|00000440| 6c 61 67 25 3a 62 6c 6f | 63 6b 25 21 36 34 3d 73 |lag%:blo|ck%!64=s|
|00000450| 70 72 69 74 65 25 3a 62 | 6c 6f 63 6b 25 21 36 38 |prite%:b|lock%!68|
|00000460| 3d 30 0d 01 68 10 e7 a9 | 74 69 74 6c 65 24 3c 31 |=0..h...|title$<1|
|00000470| 32 8c 0d 01 72 17 24 28 | 62 6c 6f 63 6b 25 2b 37 |2...r.$(|block%+7|
|00000480| 32 29 3d 74 69 74 6c 65 | 24 0d 01 7c 05 cc 0d 01 |2)=title|$..|....|
|00000490| 86 12 62 6c 6f 63 6b 25 | 21 35 36 3d 26 31 33 44 |..block%|!56=&13D|
|000004a0| 0d 01 90 17 63 6f 6d 6d | 61 25 3d a7 74 69 74 6c |....comm|a%=.titl|
|000004b0| 65 24 2c 22 2c 22 29 0d | 01 9a 0c e7 63 6f 6d 6d |e$,",").|....comm|
|000004c0| 61 25 8c 0d 01 a4 19 62 | 25 3d a0 c1 74 69 74 6c |a%.....b|%=..titl|
|000004d0| 65 24 2c 63 6f 6d 6d 61 | 25 2b 31 29 0d 01 ae 19 |e$,comma|%+1)....|
|000004e0| 24 62 25 3d c0 74 69 74 | 6c 65 24 2c 63 6f 6d 6d |$b%=.tit|le$,comm|
|000004f0| 61 25 2d 31 29 0d 01 b8 | 10 62 6c 6f 63 6b 25 21 |a%-1)...|.block%!|
|00000500| 37 32 3d 62 25 0d 01 c2 | 05 cc 0d 01 cc 2d 24 28 |72=b%...|.....-$(|
|00000510| 62 6c 6f 63 6b 25 2b 32 | 35 36 29 3d 74 69 74 6c |block%+2|56)=titl|
|00000520| 65 24 3a 62 6c 6f 63 6b | 25 21 37 32 3d 62 6c 6f |e$:block|%!72=blo|
|00000530| 63 6b 25 2b 32 35 36 0d | 01 d6 05 cd 0d 01 e0 10 |ck%+256.|........|
|00000540| 62 6c 6f 63 6b 25 21 37 | 36 3d 2d 31 0d 01 ea 05 |block%!7|6=-1....|
|00000550| cd 0d 01 f4 15 62 6c 6f | 63 6b 25 21 38 34 3d 6e |.....blo|ck%!84=n|
|00000560| 69 63 6f 6e 73 25 0d 01 | fe 2d e7 6e 69 63 6f 6e |icons%..|.-.nicon|
|00000570| 73 25 3e 30 f2 77 69 6e | 64 6f 77 69 63 6f 6e 73 |s%>0.win|dowicons|
|00000580| 28 62 6c 6f 63 6b 25 2b | 38 38 2c 6e 69 63 6f 6e |(block%+|88,nicon|
|00000590| 73 25 29 0d 02 08 2a c8 | 99 22 57 69 6d 70 5f 43 |s%)...*.|."Wimp_C|
|000005a0| 72 65 61 74 65 57 69 6e | 64 6f 77 22 2c 30 2c 62 |reateWin|dow",0,b|
|000005b0| 6c 6f 63 6b 25 b8 68 61 | 6e 64 6c 65 25 0d 02 12 |lock%.ha|ndle%...|
|000005c0| 0c 3d 68 61 6e 64 6c 65 | 25 0d 02 1c 05 3a 0d 02 |.=handle|%....:..|
|000005d0| 26 19 dd f2 77 69 6e 64 | 6f 77 69 63 6f 6e 73 28 |&...wind|owicons(|
|000005e0| 62 6c 25 2c 6e 25 29 0d | 02 30 37 e3 6c 69 25 3d |bl%,n%).|.07.li%=|
|000005f0| 31 b8 6e 25 3a f3 62 78 | 25 2c 62 79 25 2c 74 78 |1.n%:.bx|%,by%,tx|
|00000600| 24 2c 74 79 25 2c 62 67 | 25 2c 66 67 25 2c 66 6c |$,ty%,bg|%,fg%,fl|
|00000610| 67 25 2c 69 24 3a 74 78 | 25 3d a0 74 78 24 0d 02 |g%,i$:tx|%=.tx$..|
|00000620| 3a 2b 21 62 6c 25 3d 62 | 78 25 3a 62 6c 25 21 34 |:+!bl%=b|x%:bl%!4|
|00000630| 3d 62 79 25 3a 62 6c 25 | 21 38 3d 74 78 25 3a 62 |=by%:bl%|!8=tx%:b|
|00000640| 6c 25 21 31 32 3d 74 79 | 25 0d 02 44 1f 62 6c 25 |l%!12=ty|%..D.bl%|
|00000650| 21 31 36 3d 66 6c 67 25 | 84 66 67 25 3c 3c 32 34 |!16=flg%|.fg%<<24|
|00000660| 84 62 67 25 3c 3c 32 38 | 0d 02 4e 11 e7 62 6c 25 |.bg%<<28|..N..bl%|
|00000670| 21 31 36 80 26 31 30 30 | 8c 0d 02 58 15 6a 25 3d |!16.&100|...X.j%=|
|00000680| a7 69 24 2c 22 3b 22 29 | 3a 62 25 3d 2d 31 0d 02 |.i$,";")|:b%=-1..|
|00000690| 62 08 e7 6a 25 8c 0d 02 | 6c 10 62 24 3d c1 69 24 |b..j%...|l.b$=.i$|
|000006a0| 2c 6a 25 2b 31 29 0d 02 | 76 1f 69 25 3d a7 62 24 |,j%+1)..|v.i%=.b$|
|000006b0| 2c 22 2c 22 29 3a 62 25 | 3d a0 c1 62 24 2c 31 2c |,","):b%|=..b$,1,|
|000006c0| 69 25 2d 31 29 0d 02 80 | 11 24 62 25 3d c1 62 24 |i%-1)...|.$b%=.b$|
|000006d0| 2c 69 25 2b 31 29 0d 02 | 8a 05 cd 0d 02 94 21 69 |,i%+1)..|......!i|
|000006e0| 25 3d a7 69 24 2c 22 2c | 22 29 3a 62 6c 25 21 32 |%=.i$,",|"):bl%!2|
|000006f0| 30 3d a0 c0 69 24 2c 69 | 25 2d 31 29 0d 02 9e 1f |0=..i$,i|%-1)....|
|00000700| 62 6c 25 21 32 34 3d 62 | 25 3a 62 6c 25 21 32 38 |bl%!24=b|%:bl%!28|
|00000710| 3d a0 c1 69 24 2c 69 25 | 2b 31 29 0d 02 a8 05 cc |=..i$,i%|+1).....|
|00000720| 0d 02 b2 15 24 28 62 6c | 25 2b 32 30 29 3d c0 69 |....$(bl|%+20)=.i|
|00000730| 24 2c 31 31 29 0d 02 bc | 05 cd 0d 02 c6 0d 62 6c |$,11)...|......bl|
|00000740| 25 2b 3d 33 32 3a ed 0d | 02 d0 05 e1 0d 02 da 05 |%+=32:..|........|
|00000750| 3a 0d 02 e4 26 dd f2 6f | 70 65 6e 77 69 6e 64 6f |:...&..o|penwindo|
|00000760| 77 28 68 61 6e 64 6c 65 | 25 2c 6d 65 6d 25 2c 62 |w(handle|%,mem%,b|
|00000770| 65 68 69 6e 64 25 29 0d | 02 ee 3d e7 6d 65 6d 25 |ehind%).|..=.mem%|
|00000780| 3d 62 6c 6f 63 6b 25 20 | 21 6d 65 6d 25 3d 68 61 |=block% |!mem%=ha|
|00000790| 6e 64 6c 65 25 3a c8 99 | 22 57 69 6d 70 5f 47 65 |ndle%:..|"Wimp_Ge|
|000007a0| 74 57 69 6e 64 6f 77 53 | 74 61 74 65 22 2c 30 2c |tWindowS|tate",0,|
|000007b0| 6d 65 6d 25 0d 02 f8 15 | 62 6c 6f 63 6b 25 21 32 |mem%....|block%!2|
|000007c0| 38 3d 62 65 68 69 6e 64 | 25 0d 03 02 20 c8 99 22 |8=behind|%... .."|
|000007d0| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|000007e0| 2c 30 2c 6d 65 6d 25 3a | e1 0d 03 0c 05 3a 0d 03 |,0,mem%:|.....:..|
|000007f0| 16 2a dd f2 72 65 64 72 | 61 77 77 69 6e 64 6f 77 |.*..redr|awwindow|
|00000800| 28 68 61 6e 64 6c 65 25 | 29 3a ea 6d 6f 72 65 25 |(handle%|):.more%|
|00000810| 2c 78 30 25 2c 79 30 25 | 0d 03 20 38 21 62 6c 6f |,x0%,y0%|.. 8!blo|
|00000820| 63 6b 25 3d 68 61 6e 64 | 6c 65 25 3a c8 99 22 57 |ck%=hand|le%:.."W|
|00000830| 69 6d 70 5f 52 65 64 72 | 61 77 57 69 6e 64 6f 77 |imp_Redr|awWindow|
|00000840| 22 2c 30 2c 62 6c 6f 63 | 6b 25 b8 6d 6f 72 65 25 |",0,bloc|k%.more%|
|00000850| 0d 03 2a 31 f2 6c 77 61 | 6f 72 69 67 69 6e 28 62 |..*1.lwa|origin(b|
|00000860| 6c 6f 63 6b 25 2c 78 30 | 25 2c 79 30 25 29 3a 77 |lock%,x0|%,y0%):w|
|00000870| 25 3d a4 77 68 69 63 68 | 28 68 61 6e 64 6c 65 25 |%=.which|(handle%|
|00000880| 29 0d 03 34 0b c8 95 6d | 6f 72 65 25 0d 03 3e 3f |)..4...m|ore%..>?|
|00000890| 62 6c 6f 63 6b 25 21 32 | 38 2d 3d 78 30 25 3a 62 |block%!2|8-=x0%:b|
|000008a0| 6c 6f 63 6b 25 21 33 32 | 2d 3d 79 30 25 3a 62 6c |lock%!32|-=y0%:bl|
|000008b0| 6f 63 6b 25 21 33 36 2d | 3d 78 30 25 3a 62 6c 6f |ock%!36-|=x0%:blo|
|000008c0| 63 6b 25 21 34 30 2d 3d | 79 30 25 0d 03 48 20 f2 |ck%!40-=|y0%..H .|
|000008d0| 72 65 64 6f 77 69 6e 64 | 6f 77 28 68 61 6e 64 6c |redowind|ow(handl|
|000008e0| 65 25 2c 78 30 25 2c 79 | 30 25 29 0d 03 52 28 c8 |e%,x0%,y|0%)..R(.|
|000008f0| 99 22 57 69 6d 70 5f 47 | 65 74 52 65 63 74 61 6e |."Wimp_G|etRectan|
|00000900| 67 6c 65 22 2c 30 2c 62 | 6c 6f 63 6b 25 b8 6d 6f |gle",0,b|lock%.mo|
|00000910| 72 65 25 0d 03 5c 05 ce | 0d 03 66 05 e1 0d 03 70 |re%..\..|..f....p|
|00000920| 05 3a 0d 03 7a 1d dd f2 | 6c 77 61 6f 72 69 67 69 |.:..z...|lwaorigi|
|00000930| 6e 28 62 25 2c f8 20 78 | 25 2c f8 20 79 25 29 0d |n(b%,. x|%,. y%).|
|00000940| 03 84 22 78 25 3d 62 25 | 21 34 2d 62 25 21 32 30 |.."x%=b%|!4-b%!20|
|00000950| 3a 79 25 3d 62 25 21 31 | 36 2d 62 25 21 32 34 3a |:y%=b%!1|6-b%!24:|
|00000960| e1 0d 03 8e 05 3a 0d 03 | 98 2b dd f2 72 65 73 69 |.....:..|.+..resi|
|00000970| 7a 65 77 69 6e 64 6f 77 | 28 68 61 6e 64 6c 65 25 |zewindow|(handle%|
|00000980| 2c 62 78 25 2c 62 79 25 | 2c 74 78 25 2c 74 79 25 |,bx%,by%|,tx%,ty%|
|00000990| 29 0d 03 a2 37 21 62 6c | 6f 63 6b 25 3d 62 78 25 |)...7!bl|ock%=bx%|
|000009a0| 3a 62 6c 6f 63 6b 25 21 | 34 3d 62 79 25 3a 62 6c |:block%!|4=by%:bl|
|000009b0| 6f 63 6b 25 21 38 3d 74 | 78 25 3a 62 6c 6f 63 6b |ock%!8=t|x%:block|
|000009c0| 25 21 31 32 3d 74 79 25 | 0d 03 ac 25 c8 99 22 57 |%!12=ty%|...%.."W|
|000009d0| 69 6d 70 5f 53 65 74 45 | 78 74 65 6e 74 22 2c 68 |imp_SetE|xtent",h|
|000009e0| 61 6e 64 6c 65 25 2c 62 | 6c 6f 63 6b 25 0d 03 b6 |andle%,b|lock%...|
|000009f0| 13 21 62 6c 6f 63 6b 25 | 3d 68 61 6e 64 6c 65 25 |.!block%|=handle%|
|00000a00| 0d 03 c0 23 c8 99 22 57 | 69 6d 70 5f 47 65 74 57 |...#.."W|imp_GetW|
|00000a10| 69 6e 64 6f 77 49 6e 66 | 6f 22 2c 30 2c 62 6c 6f |indowInf|o",0,blo|
|00000a20| 63 6b 25 0d 03 ca 20 c8 | 99 22 57 69 6d 70 5f 4f |ck%... .|."Wimp_O|
|00000a30| 70 65 6e 57 69 6e 64 6f | 77 22 2c 30 2c 62 6c 6f |penWindo|w",0,blo|
|00000a40| 63 6b 25 0d 03 d4 05 e1 | 0d 03 de 05 3a 0d 03 e8 |ck%.....|....:...|
|00000a50| 1a dd f2 63 6c 6f 73 65 | 77 69 6e 64 6f 77 28 68 |...close|window(h|
|00000a60| 61 6e 64 6c 65 25 29 0d | 03 f2 31 21 62 6c 6f 63 |andle%).|..1!bloc|
|00000a70| 6b 25 3d 68 61 6e 64 6c | 65 25 3a c8 99 22 57 69 |k%=handl|e%:.."Wi|
|00000a80| 6d 70 5f 43 6c 6f 73 65 | 57 69 6e 64 6f 77 22 2c |mp_Close|Window",|
|00000a90| 30 2c 62 6c 6f 63 6b 25 | 0d 03 fc 0e c8 8e 68 61 |0,block%|......ha|
|00000aa0| 6e 64 6c 65 25 ca 0d 04 | 06 16 c9 64 69 73 70 6c |ndle%...|...displ|
|00000ab0| 61 79 25 3a 64 69 73 70 | 24 3d 22 22 0d 04 10 05 |ay%:disp|$=""....|
|00000ac0| cb 0d 04 1a 05 e1 0d 04 | 24 05 3a 0d 04 2e 28 2a |........|$.:...(*|
|00000ad0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 20 4d 6f 75 73 65 20 |********|* Mouse |
|00000ae0| 72 6f 75 74 69 6e 65 73 | 20 2a 2a 2a 2a 2a 2a 2a |routines| *******|
|00000af0| 2a 2a 2a 0d 04 38 05 3a | 0d 04 42 2d dd f2 6d 6f |***..8.:|..B-..mo|
|00000b00| 75 73 65 62 75 74 74 6f | 6e 63 6c 69 63 6b 3a ea |usebutto|nclick:.|
|00000b10| 68 61 6e 64 6c 65 25 2c | 62 75 74 74 6f 6e 25 2c |handle%,|button%,|
|00000b20| 69 63 6f 6e 25 0d 04 4c | 13 62 75 74 74 6f 6e 25 |icon%..L|.button%|
|00000b30| 3d 70 6f 6c 6c 25 21 38 | 0d 04 56 14 68 61 6e 64 |=poll%!8|..V.hand|
|00000b40| 6c 65 25 3d 70 6f 6c 6c | 25 21 31 32 0d 04 60 12 |le%=poll|%!12..`.|
|00000b50| 69 63 6f 6e 25 3d 70 6f | 6c 6c 25 21 31 36 0d 04 |icon%=po|ll%!16..|
|00000b60| 6a 22 6d 6f 75 73 65 78 | 25 3d 21 70 6f 6c 6c 25 |j"mousex|%=!poll%|
|00000b70| 3a 6d 6f 75 73 65 79 25 | 3d 70 6f 6c 6c 25 21 34 |:mousey%|=poll%!4|
|00000b80| 0d 04 74 0f e7 62 75 74 | 74 6f 6e 25 3d 32 8c 0d |..t..but|ton%=2..|
|00000b90| 04 7e 10 e7 68 61 6e 64 | 6c 65 25 3d 2d 32 8c 0d |.~..hand|le%=-2..|
|00000ba0| 04 88 0b 6d 65 6e 75 25 | 3d 31 0d 04 92 37 c8 99 |...menu%|=1...7..|
|00000bb0| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 |"Wimp_Cr|eateMenu|
|00000bc0| 22 2c 30 2c 69 6e 69 74 | 62 6c 6f 63 6b 25 2c 6d |",0,init|block%,m|
|00000bd0| 6f 75 73 65 78 25 2d 36 | 34 2c 6d 6f 75 73 65 79 |ousex%-6|4,mousey|
|00000be0| 25 0d 04 9c 05 cc 0d 04 | a6 0b 6d 65 6e 75 25 3d |%.......|..menu%=|
|00000bf0| 32 0d 04 b0 34 c8 99 22 | 57 69 6d 70 5f 43 72 65 |2...4.."|Wimp_Cre|
|00000c00| 61 74 65 4d 65 6e 75 22 | 2c 30 2c 6d 61 69 6e 62 |ateMenu"|,0,mainb|
|00000c10| 6c 6f 63 6b 25 2c 6d 6f | 75 73 65 78 25 2c 6d 6f |lock%,mo|usex%,mo|
|00000c20| 75 73 65 79 25 0d 04 ba | 05 cd 0d 04 c4 05 cd 0d |usey%...|........|
|00000c30| 04 ce 0f e7 62 75 74 74 | 6f 6e 25 3d 34 8c 0d 04 |....butt|on%=4...|
|00000c40| d8 0e c8 8e 68 61 6e 64 | 6c 65 25 ca 0d 04 e2 0d |....hand|le%.....|
|00000c50| c9 2d 32 3a f2 6f 70 65 | 6e 0d 04 ec 2e c9 73 61 |.-2:.ope|n.....sa|
|00000c60| 76 65 73 65 63 25 3a 73 | 61 76 65 32 25 3d 73 61 |vesec%:s|ave2%=sa|
|00000c70| 76 65 73 65 63 25 3a 73 | 61 76 65 32 24 3d 22 73 |vesec%:s|ave2$="s|
|00000c80| 61 76 65 73 65 63 22 0d | 04 f6 28 f2 63 6c 69 63 |avesec".|..(.clic|
|00000c90| 6b 64 69 61 6c 6f 67 28 | 73 61 76 65 32 25 2c 73 |kdialog(|save2%,s|
|00000ca0| 61 76 65 32 24 2c 70 6f | 6c 6c 25 21 31 36 29 0d |ave2$,po|ll%!16).|
|00000cb0| 05 00 30 c9 63 6f 6d 70 | 31 25 3a f2 63 6c 69 63 |..0.comp|1%:.clic|
|00000cc0| 6b 64 69 61 6c 6f 67 28 | 63 6f 6d 70 31 25 2c 63 |kdialog(|comp1%,c|
|00000cd0| 6f 6d 70 31 24 2c 70 6f | 6c 6c 25 21 31 36 29 0d |omp1$,po|ll%!16).|
|00000ce0| 05 0a 2d c9 63 6f 6d 70 | 25 3a f2 63 6c 69 63 6b |..-.comp|%:.click|
|00000cf0| 64 69 61 6c 6f 67 28 63 | 6f 6d 70 25 2c 63 6f 6d |dialog(c|omp%,com|
|00000d00| 70 24 2c 70 6f 6c 6c 25 | 21 31 36 29 0d 05 14 2d |p$,poll%|!16)...-|
|00000d10| c9 63 61 74 31 25 3a f2 | 63 6c 69 63 6b 64 69 61 |.cat1%:.|clickdia|
|00000d20| 6c 6f 67 28 63 61 74 31 | 25 2c 63 61 74 31 24 2c |log(cat1|%,cat1$,|
|00000d30| 70 6f 6c 6c 25 21 31 36 | 29 0d 05 1e 2d c9 73 61 |poll%!16|)...-.sa|
|00000d40| 76 65 25 3a f2 63 6c 69 | 63 6b 64 69 61 6c 6f 67 |ve%:.cli|ckdialog|
|00000d50| 28 73 61 76 65 25 2c 73 | 61 76 65 24 2c 70 6f 6c |(save%,s|ave$,pol|
|00000d60| 6c 25 21 31 36 29 0d 05 | 28 30 c9 73 61 76 65 31 |l%!16)..|(0.save1|
|00000d70| 25 3a f2 63 6c 69 63 6b | 64 69 61 6c 6f 67 28 73 |%:.click|dialog(s|
|00000d80| 61 76 65 31 25 2c 73 61 | 76 65 31 24 2c 70 6f 6c |ave1%,sa|ve1$,pol|
|00000d90| 6c 25 21 31 36 29 0d 05 | 32 30 c9 66 69 6e 64 31 |l%!16)..|20.find1|
|00000da0| 25 3a f2 63 6c 69 63 6b | 64 69 61 6c 6f 67 28 66 |%:.click|dialog(f|
|00000db0| 69 6e 64 31 25 2c 66 6f | 75 6e 64 24 2c 70 6f 6c |ind1%,fo|und$,pol|
|00000dc0| 6c 25 21 31 36 29 0d 05 | 3c 2d c9 66 69 6e 64 25 |l%!16)..|<-.find%|
|00000dd0| 3a f2 63 6c 69 63 6b 64 | 69 61 6c 6f 67 28 66 69 |:.clickd|ialog(fi|
|00000de0| 6e 64 25 2c 66 69 6e 64 | 24 2c 70 6f 6c 6c 25 21 |nd%,find|$,poll%!|
|00000df0| 31 36 29 0d 05 46 35 c9 | 64 69 73 70 6c 61 79 25 |16)..F5.|display%|
|00000e00| 3a c8 99 22 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 |:.."Wimp|_GetWind|
|00000e10| 6f 77 53 74 61 74 65 22 | 2c 64 69 73 70 6c 61 79 |owState"|,display|
|00000e20| 25 2c 62 6c 6f 63 6b 25 | 0d 05 50 2c 78 70 6f 73 |%,block%|..P,xpos|
|00000e30| 25 3d 62 6c 6f 63 6b 25 | 21 32 30 2d 28 28 62 6c |%=block%|!20-((bl|
|00000e40| 6f 63 6b 25 21 34 2d 6d | 6f 75 73 65 78 25 29 80 |ock%!4-m|ousex%).|
|00000e50| 2d 31 36 29 0d 05 5a 27 | 79 70 6f 73 25 3d 62 6c |-16)..Z'|ypos%=bl|
|00000e60| 6f 63 6b 25 21 32 34 2d | 28 62 6c 6f 63 6b 25 21 |ock%!24-|(block%!|
|00000e70| 31 36 2d 6d 6f 75 73 65 | 79 25 29 0d 05 64 24 79 |16-mouse|y%)..d$y|
|00000e80| 70 6f 73 25 3d 28 79 70 | 6f 73 25 80 2d 33 32 29 |pos%=(yp|os%.-32)|
|00000e90| 2b 28 62 6c 6f 63 6b 25 | 21 32 34 29 83 33 32 0d |+(block%|!24).32.|
|00000ea0| 05 6e 41 c8 99 22 57 69 | 6d 70 5f 53 65 74 43 61 |.nA.."Wi|mp_SetCa|
|00000eb0| 72 65 74 50 6f 73 69 74 | 69 6f 6e 22 2c 64 69 73 |retPosit|ion",dis|
|00000ec0| 70 6c 61 79 25 2c 2d 31 | 2c 78 70 6f 73 25 2c 79 |play%,-1|,xpos%,y|
|00000ed0| 70 6f 73 25 2c 33 36 2c | 78 70 6f 73 25 81 31 36 |pos%,36,|xpos%.16|
|00000ee0| 0d 05 78 2d c9 6f 70 65 | 6e 25 3a f2 63 6c 69 63 |..x-.ope|n%:.clic|
|00000ef0| 6b 64 69 61 6c 6f 67 28 | 6f 70 65 6e 25 2c 6f 70 |kdialog(|open%,op|
|00000f00| 65 6e 24 2c 70 6f 6c 6c | 25 21 31 36 29 0d 05 82 |en$,poll|%!16)...|
|00000f10| 32 c9 64 69 61 6c 6f 67 | 25 3a f2 63 6c 69 63 6b |2.dialog|%:.click|
|00000f20| 64 69 61 6c 6f 67 28 64 | 69 61 6c 6f 67 25 2c 63 |dialog(d|ialog%,c|
|00000f30| 6c 61 69 6d 24 2c 70 6f | 6c 6c 25 21 31 36 29 0d |laim$,po|ll%!16).|
|00000f40| 05 8c 05 cb 0d 05 96 05 | cd 0d 05 a0 05 e1 0d 05 |........|........|
|00000f50| aa 05 3a 0d 05 b4 27 2a | 2a 2a 2a 2a 2a 2a 2a 2a |..:...'*|********|
|00000f60| 2a 20 44 72 61 67 20 72 | 6f 75 74 69 6e 65 73 20 |* Drag r|outines |
|00000f70| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0d 05 be 05 3a 0d |********|**....:.|
|00000f80| 05 c8 11 dd f2 64 72 61 | 67 28 68 61 6e 64 25 29 |.....dra|g(hand%)|
|00000f90| 0d 05 d2 0c c8 8e 68 61 | 6e 64 25 ca 0d 05 dc 0b |......ha|nd%.....|
|00000fa0| c9 73 61 76 65 31 25 0d | 05 e6 1b 73 74 61 72 74 |.save1%.|...start|
|00000fb0| 25 3d 73 74 25 2a 31 30 | 2b 73 68 25 2a 35 2b 73 |%=st%*10|+sh%*5+s|
|00000fc0| 73 25 0d 05 f0 19 65 6e | 64 25 3d 65 74 25 2a 31 |s%....en|d%=et%*1|
|00000fd0| 30 2b 65 68 25 2a 35 2b | 65 73 25 0d 05 fa 21 6c |0+eh%*5+|es%...!l|
|00000fe0| 65 6e 25 3d 65 6e 64 25 | 2d 73 74 61 72 74 25 3a |en%=end%|-start%:|
|00000ff0| 4c 25 3d 6c 65 6e 25 2a | 31 30 32 34 0d 06 04 0d |L%=len%*|1024....|
|00001000| e7 b4 6c 65 6e 25 3d 31 | 8c 0d 06 0e 2a f2 6c 6f |..len%=1|....*.lo|
|00001010| 61 64 73 65 63 74 6f 72 | 28 73 74 25 2c 73 68 25 |adsector|(st%,sh%|
|00001020| 2c 73 73 25 2c 6c 65 6e | 25 2b 31 2c 64 72 69 76 |,ss%,len|%+1,driv|
|00001030| 65 25 29 0d 06 18 05 cc | 0d 06 22 4a 6a 25 3d a4 |e%).....|.."Jj%=.|
|00001040| 61 6c 65 72 74 28 22 53 | 74 61 72 74 20 61 64 64 |alert("S|tart add|
|00001050| 72 65 73 73 20 69 73 20 | 6c 65 73 73 20 74 68 61 |ress is |less tha|
|00001060| 6e 20 65 6e 64 20 61 64 | 64 72 65 73 73 2e 20 50 |n end ad|dress. P|
|00001070| 6c 65 61 73 65 20 63 68 | 65 63 6b 2e 22 2c 32 2c |lease ch|eck.",2,|
|00001080| 30 29 0d 06 2c 05 cd 0d | 06 36 0d c9 73 61 76 65 |0)..,...|.6..save|
|00001090| 73 65 63 25 0d 06 40 0b | 4c 25 3d 31 30 32 34 0d |sec%..@.|L%=1024.|
|000010a0| 06 4a 05 cb 0d 06 54 23 | c8 99 22 57 69 6d 70 5f |.J....T#|.."Wimp_|
|000010b0| 47 65 74 50 6f 69 6e 74 | 65 72 49 6e 66 6f 22 2c |GetPoint|erInfo",|
|000010c0| 2c 62 6c 6f 63 6b 25 0d | 06 5e 33 62 6c 6f 63 6b |,block%.|.^3block|
|000010d0| 25 21 32 30 3d 62 6c 6f | 63 6b 25 21 31 32 3a f4 |%!20=blo|ck%!12:.|
|000010e0| 20 64 65 73 74 69 6e 61 | 74 69 6f 6e 20 77 69 6e | destina|tion win|
|000010f0| 64 6f 77 20 68 61 6e 64 | 6c 65 0d 06 68 31 62 6c |dow hand|le..h1bl|
|00001100| 6f 63 6b 25 21 32 34 3d | 62 6c 6f 63 6b 25 21 31 |ock%!24=|block%!1|
|00001110| 36 3a f4 20 64 65 73 74 | 69 6e 61 74 69 6f 6e 20 |6:. dest|ination |
|00001120| 69 63 6f 6e 20 68 61 6e | 64 6c 65 0d 06 72 25 62 |icon han|dle..r%b|
|00001130| 6c 6f 63 6b 25 21 32 38 | 3d 21 62 6c 6f 63 6b 25 |lock%!28|=!block%|
|00001140| 3a f4 20 64 65 73 74 69 | 6e 61 74 69 6f 6e 20 78 |:. desti|nation x|
|00001150| 0d 06 7c 26 62 6c 6f 63 | 6b 25 21 33 32 3d 62 6c |..|&bloc|k%!32=bl|
|00001160| 6f 63 6b 25 21 34 3a f4 | 20 64 65 73 74 69 6e 61 |ock%!4:.| destina|
|00001170| 74 69 6f 6e 20 79 0d 06 | 86 2c 62 6c 6f 63 6b 25 |tion y..|.,block%|
|00001180| 21 33 36 3d 4c 25 3a f4 | 20 65 73 74 69 6d 61 74 |!36=L%:.| estimat|
|00001190| 65 64 20 73 69 7a 65 20 | 28 69 6e 20 62 79 74 65 |ed size |(in byte|
|000011a0| 73 29 0d 06 90 1e 62 6c | 6f 63 6b 25 21 34 30 3d |s)....bl|ock%!40=|
|000011b0| 26 46 46 44 3a f4 20 66 | 69 6c 65 20 74 79 70 65 |&FFD:. f|ile type|
|000011c0| 0d 06 9a 0e 21 62 6c 6f | 63 6b 25 3d 36 30 0d 06 |....!blo|ck%=60..|
|000011d0| a4 1b 62 6c 6f 63 6b 25 | 21 31 32 3d 30 3a 62 6c |..block%|!12=0:bl|
|000011e0| 6f 63 6b 25 21 31 36 3d | 31 0d 06 ae 25 24 28 62 |ock%!16=|1...%$(b|
|000011f0| 6c 6f 63 6b 25 2b 34 34 | 29 3d a4 66 69 6c 65 6e |lock%+44|)=.filen|
|00001200| 61 6d 65 28 24 66 69 6c | 65 25 29 2b bd 30 0d 06 |ame($fil|e%)+.0..|
|00001210| b8 2c c8 99 22 57 69 6d | 70 5f 53 65 6e 64 4d 65 |.,.."Wim|p_SendMe|
|00001220| 73 73 61 67 65 22 2c 31 | 37 2c 62 6c 6f 63 6b 25 |ssage",1|7,block%|
|00001230| 2c 62 6c 6f 63 6b 25 21 | 32 30 0d 06 c2 05 e1 0d |,block%!|20......|
|00001240| 06 cc 05 3a 0d 06 d6 21 | dd f2 69 6e 69 74 64 72 |...:...!|..initdr|
|00001250| 61 67 28 68 61 6e 64 25 | 2c 69 63 6f 6e 25 2c 74 |ag(hand%|,icon%,t|
|00001260| 79 70 65 25 29 0d 06 e0 | 13 64 72 61 67 66 72 6f |ype%)...|.dragfro|
|00001270| 6d 25 3d 68 61 6e 64 25 | 0d 06 ea 31 21 62 6c 6f |m%=hand%|...1!blo|
|00001280| 63 6b 25 3d 68 61 6e 64 | 25 3a c8 99 22 57 69 6d |ck%=hand|%:.."Wim|
|00001290| 70 5f 47 65 74 57 69 6e | 64 6f 77 53 74 61 74 65 |p_GetWin|dowState|
|000012a0| 22 2c 2c 62 6c 6f 63 6b | 25 0d 06 f4 1d 69 78 25 |",,block|%....ix%|
|000012b0| 3d 62 6c 6f 63 6b 25 21 | 34 3a 69 79 25 3d 62 6c |=block%!|4:iy%=bl|
|000012c0| 6f 63 6b 25 21 38 0d 06 | fe 30 62 6c 6f 63 6b 25 |ock%!8..|.0block%|
|000012d0| 21 34 3d 69 63 6f 6e 25 | 3a c8 99 22 57 69 6d 70 |!4=icon%|:.."Wimp|
|000012e0| 5f 47 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_GetIcon|State",,|
|000012f0| 62 6c 6f 63 6b 25 0d 07 | 08 12 62 6c 6f 63 6b 25 |block%..|..block%|
|00001300| 21 34 3d 74 79 70 65 25 | 0d 07 12 20 62 6c 6f 63 |!4=type%|... bloc|
|00001310| 6b 25 21 38 2b 3d 69 78 | 25 3a 62 6c 6f 63 6b 25 |k%!8+=ix|%:block%|
|00001320| 21 31 32 2b 3d 69 79 25 | 0d 07 1c 21 62 6c 6f 63 |!12+=iy%|...!bloc|
|00001330| 6b 25 21 31 36 2b 3d 69 | 78 25 3a 62 6c 6f 63 6b |k%!16+=i|x%:block|
|00001340| 25 21 32 30 2b 3d 69 79 | 25 0d 07 26 1b 62 6c 6f |%!20+=iy|%..&.blo|
|00001350| 63 6b 25 21 32 34 3d 30 | 3a 62 6c 6f 63 6b 25 21 |ck%!24=0|:block%!|
|00001360| 32 38 3d 30 0d 07 30 21 | 62 6c 6f 63 6b 25 21 33 |28=0..0!|block%!3|
|00001370| 32 3d 31 32 37 39 3a 62 | 6c 6f 63 6b 25 21 33 36 |2=1279:b|lock%!36|
|00001380| 3d 31 30 32 33 0d 07 3a | 1c c8 99 22 57 69 6d 70 |=1023..:|..."Wimp|
|00001390| 5f 44 72 61 67 42 6f 78 | 22 2c 2c 62 6c 6f 63 6b |_DragBox|",,block|
|000013a0| 25 0d 07 44 05 e1 0d 07 | 4e 05 3a 0d 07 58 2b 2a |%..D....|N.:..X+*|
|000013b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 20 4b 65 79 70 72 65 |********|* Keypre|
|000013c0| 73 73 20 72 6f 75 74 69 | 6e 65 73 20 2a 2a 2a 2a |ss routi|nes ****|
|000013d0| 2a 2a 2a 2a 2a 2a 0d 07 | 62 05 3a 0d 07 6c 1c dd |******..|b.:..l..|
|000013e0| f2 6b 65 79 70 72 65 73 | 73 28 68 61 6e 64 6c 65 |.keypres|s(handle|
|000013f0| 25 2c 6b 65 79 25 29 0d | 07 76 25 c8 99 22 57 69 |%,key%).|.v%.."Wi|
|00001400| 6d 70 5f 47 65 74 43 61 | 72 65 74 50 6f 73 69 74 |mp_GetCa|retPosit|
|00001410| 69 6f 6e 22 2c 2c 62 6c | 6f 63 6b 25 0d 07 80 2c |ion",,bl|ock%...,|
|00001420| 63 78 25 3d 62 6c 6f 63 | 6b 25 21 38 3a 63 79 25 |cx%=bloc|k%!8:cy%|
|00001430| 3d 62 6c 6f 63 6b 25 21 | 31 32 3a 73 78 25 3d 62 |=block%!|12:sx%=b|
|00001440| 6c 6f 63 6b 25 21 32 30 | 0d 07 8a 1b 6c 69 6e 65 |lock%!20|....line|
|00001450| 25 3d 36 33 2d 28 62 6c | 6f 63 6b 25 21 31 32 29 |%=63-(bl|ock%!12)|
|00001460| 81 33 32 0d 07 94 0e c8 | 8e 68 61 6e 64 6c 65 25 |.32.....|.handle%|
|00001470| ca 0d 07 9e 0d c9 64 69 | 73 70 6c 61 79 25 0d 07 |......di|splay%..|
|00001480| a8 37 e7 73 78 25 3e 35 | 80 73 78 25 3c 35 32 f2 |.7.sx%>5|.sx%<52.|
|00001490| 68 65 78 28 6b 65 79 25 | 29 20 8b e7 73 78 25 3e |hex(key%|) ..sx%>|
|000014a0| 35 36 80 73 78 25 3c 37 | 33 f2 61 73 63 69 69 28 |56.sx%<7|3.ascii(|
|000014b0| 6b 65 79 25 29 0d 07 b2 | 28 c9 73 61 76 65 31 25 |key%)...|(.save1%|
|000014c0| 3a e7 6b 65 79 25 3d 32 | 37 f2 63 6c 6f 73 65 77 |:.key%=2|7.closew|
|000014d0| 69 6e 64 6f 77 28 73 61 | 76 65 31 25 29 0d 07 bc |indow(sa|ve1%)...|
|000014e0| 05 cb 0d 07 c6 05 e1 0d | 07 d0 05 3a 0d 07 da 27 |........|...:...'|
|000014f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 20 4d 65 6e 75 20 |********|** Menu |
|00001500| 72 6f 75 74 69 6e 65 73 | 20 2a 2a 2a 2a 2a 2a 2a |routines| *******|
|00001510| 2a 2a 2a 0d 07 e4 05 3a | 0d 07 ee 1c dd a4 63 72 |***....:|......cr|
|00001520| 65 61 74 65 6d 65 6e 75 | 28 6d 62 25 2c 74 24 2c |eatemenu|(mb%,t$,|
|00001530| 74 62 25 29 0d 07 f8 37 | ea 6e 65 77 24 2c 70 74 |tb%)...7|.new$,pt|
|00001540| 72 25 2c 73 68 61 64 65 | 25 2c 74 69 63 6b 25 2c |r%,shade|%,tick%,|
|00001550| 64 6f 74 74 65 64 25 2c | 73 75 62 6d 65 6e 75 25 |dotted%,|submenu%|
|00001560| 2c 77 72 69 74 65 61 62 | 6c 65 25 0d 08 02 21 6e |,writeab|le%...!n|
|00001570| 75 6d 6f 66 69 74 65 6d | 73 25 3d bb c0 74 24 2c |umofitem|s%=..t$,|
|00001580| 31 29 3a 74 24 3d c1 74 | 24 2c 32 29 0d 08 0c 40 |1):t$=.t|$,2)...@|
|00001590| 6e 65 78 74 6d 65 6e 75 | 25 3d 6d 62 25 2b 32 38 |nextmenu|%=mb%+28|
|000015a0| 2b 32 34 2a 6e 75 6d 6f | 66 69 74 65 6d 73 25 3a |+24*numo|fitems%:|
|000015b0| 6e 65 78 74 74 65 78 74 | 25 3d 74 62 25 2b 32 34 |nexttext|%=tb%+24|
|000015c0| 2a 6e 75 6d 6f 66 69 74 | 65 6d 73 25 0d 08 16 2b |*numofit|ems%...+|
|000015d0| 24 6d 62 25 3d c0 74 24 | 2c a7 74 24 2c 22 7c 22 |$mb%=.t$|,.t$,"|"|
|000015e0| 29 2d 31 29 3a 74 24 3d | c1 74 24 2c a7 74 24 2c |)-1):t$=|.t$,.t$,|
|000015f0| 22 7c 22 29 2b 31 29 0d | 08 20 26 6d 62 25 3f 31 |"|")+1).|. &mb%?1|
|00001600| 32 3d 37 3a f4 20 54 69 | 74 6c 65 20 66 6f 72 65 |2=7:. Ti|tle fore|
|00001610| 67 72 6f 75 6e 64 20 63 | 6f 6c 6f 75 72 0d 08 2a |ground c|olour..*|
|00001620| 26 6d 62 25 3f 31 33 3d | 32 3a f4 20 54 69 74 6c |&mb%?13=|2:. Titl|
|00001630| 65 20 62 61 63 6b 67 72 | 6f 75 6e 64 20 63 6f 6c |e backgr|ound col|
|00001640| 6f 75 72 0d 08 34 23 6d | 62 25 3f 31 34 3d 37 3a |our..4#m|b%?14=7:|
|00001650| f4 20 57 6f 72 6b 20 61 | 72 65 61 20 66 6f 72 65 |. Work a|rea fore|
|00001660| 67 72 6f 75 6e 64 0d 08 | 3e 23 6d 62 25 3f 31 35 |ground..|>#mb%?15|
|00001670| 3d 30 3a f4 20 57 6f 72 | 6b 20 61 72 65 61 20 62 |=0:. Wor|k area b|
|00001680| 61 63 6b 67 72 6f 75 6e | 64 0d 08 48 1b 6d 62 25 |ackgroun|d..H.mb%|
|00001690| 21 31 36 3d 32 30 30 3a | f4 20 4d 65 6e 75 20 77 |!16=200:|. Menu w|
|000016a0| 69 64 74 68 0d 08 52 1e | 6d 62 25 21 32 30 3d 34 |idth..R.|mb%!20=4|
|000016b0| 34 3a f4 20 48 65 69 67 | 68 74 20 6f 66 20 74 65 |4:. Heig|ht of te|
|000016c0| 78 74 0d 08 5c 22 6d 62 | 25 21 32 34 3d 30 3a f4 |xt..\"mb|%!24=0:.|
|000016d0| 20 53 70 61 63 65 20 62 | 65 74 77 65 65 6e 20 6c | Space b|etween l|
|000016e0| 69 6e 65 73 0d 08 66 0f | 70 74 72 25 3d 6d 62 25 |ines..f.|ptr%=mb%|
|000016f0| 2b 32 38 0d 08 70 39 f5 | 3a 73 68 61 64 65 25 3d |+28..p9.|:shade%=|
|00001700| 30 3a 74 69 63 6b 25 3d | 30 3a 64 6f 74 74 65 64 |0:tick%=|0:dotted|
|00001710| 25 3d 30 3a 77 72 69 74 | 65 61 62 6c 65 25 3d 30 |%=0:writ|eable%=0|
|00001720| 3a 73 75 62 6d 65 6e 75 | 25 3d 2d 31 0d 08 7a 10 |:submenu|%=-1..z.|
|00001730| e7 c0 74 24 2c 31 29 3d | 22 5b 22 8c 0d 08 84 23 |..t$,1)=|"["....#|
|00001740| 74 24 3d c1 74 24 2c 32 | 29 3a 6e 65 77 24 3d a0 |t$=.t$,2|):new$=.|
|00001750| c0 74 24 2c a7 74 24 2c | 22 5d 22 29 2d 31 29 0d |.t$,.t$,|"]")-1).|
|00001760| 08 8e 16 74 24 3d c1 74 | 24 2c a7 74 24 2c 22 5d |...t$=.t|$,.t$,"]|
|00001770| 22 29 2b 31 29 0d 08 98 | 32 73 75 62 6d 65 6e 75 |")+1)...|2submenu|
|00001780| 25 3d a4 63 72 65 61 74 | 65 6d 65 6e 75 28 6e 65 |%=.creat|emenu(ne|
|00001790| 78 74 6d 65 6e 75 25 2c | 6e 65 77 24 2c 6e 65 78 |xtmenu%,|new$,nex|
|000017a0| 74 74 65 78 74 25 29 0d | 08 a2 05 cd 0d 08 ac 10 |ttext%).|........|
|000017b0| e7 c0 74 24 2c 31 29 3d | 22 3c 22 8c 0d 08 b6 27 |..t$,1)=|"<"....'|
|000017c0| 74 24 3d c1 74 24 2c 32 | 29 3a 73 75 62 6d 65 6e |t$=.t$,2|):submen|
|000017d0| 75 25 3d a0 c0 74 24 2c | a7 74 24 2c 22 3e 22 29 |u%=..t$,|.t$,">")|
|000017e0| 2d 31 29 0d 08 c0 16 74 | 24 3d c1 74 24 2c a7 74 |-1)....t|$=.t$,.t|
|000017f0| 24 2c 22 3e 22 29 2b 31 | 29 0d 08 ca 05 cd 0d 08 |$,">")+1|).......|
|00001800| d4 25 e7 c0 74 24 2c 31 | 29 3d 22 2e 22 74 24 3d |.%..t$,1|)="."t$=|
|00001810| c1 74 24 2c 32 29 3a f4 | 20 44 6f 20 6e 6f 74 68 |.t$,2):.| Do noth|
|00001820| 69 6e 67 0d 08 de 27 e7 | c0 74 24 2c 31 29 3d 22 |ing...'.|.t$,1)="|
|00001830| a4 22 73 68 61 64 65 25 | 3d 26 34 30 30 30 30 30 |."shade%|=&400000|
|00001840| 3a 74 24 3d c1 74 24 2c | 32 29 0d 08 e8 20 e7 c0 |:t$=.t$,|2)... ..|
|00001850| 74 24 2c 31 29 3d 22 80 | 22 74 69 63 6b 25 3d 31 |t$,1)=".|"tick%=1|
|00001860| 3a 74 24 3d c1 74 24 2c | 32 29 0d 08 f2 22 e7 c0 |:t$=.t$,|2)..."..|
|00001870| 74 24 2c 31 29 3d 22 3a | 22 64 6f 74 74 65 64 25 |t$,1)=":|"dotted%|
|00001880| 3d 32 3a 74 24 3d c1 74 | 24 2c 32 29 0d 08 fc 25 |=2:t$=.t|$,2)...%|
|00001890| e7 c0 74 24 2c 31 29 3d | 22 5e 22 77 72 69 74 65 |..t$,1)=|"^"write|
|000018a0| 61 62 6c 65 25 3d 34 3a | 74 24 3d c1 74 24 2c 32 |able%=4:|t$=.t$,2|
|000018b0| 29 0d 09 06 0f 67 25 3d | a7 74 24 2c 22 7c 22 29 |)....g%=|.t$,"|")|
|000018c0| 0d 09 10 10 e7 77 72 69 | 74 65 61 62 6c 65 25 8c |.....wri|teable%.|
|000018d0| 0d 09 1a 2f 69 25 3d a7 | 74 24 2c 22 2c 22 29 3a |.../i%=.|t$,","):|
|000018e0| 70 74 72 25 21 31 32 3d | a0 c0 74 24 2c 69 25 2d |ptr%!12=|..t$,i%-|
|000018f0| 31 29 3a 74 24 3d c1 74 | 24 2c 69 25 2b 31 29 0d |1):t$=.t|$,i%+1).|
|00001900| 09 24 0e 70 74 72 25 21 | 31 36 3d 2d 31 0d 09 2e |.$.ptr%!|16=-1...|
|00001910| 1c 70 74 72 25 21 32 30 | 3d a0 c0 74 24 2c a7 74 |.ptr%!20|=..t$,.t|
|00001920| 24 2c 22 7c 22 29 2d 31 | 29 0d 09 38 3c 6d 62 25 |$,"|")-1|)..8<mb%|
|00001930| 21 31 36 3d a4 67 72 65 | 61 74 65 72 28 6d 62 25 |!16=.gre|ater(mb%|
|00001940| 21 31 36 2c 34 2b 31 36 | 2a 70 74 72 25 21 32 30 |!16,4+16|*ptr%!20|
|00001950| 29 3a f4 20 57 69 64 74 | 68 20 6f 66 20 6e 65 77 |):. Widt|h of new|
|00001960| 20 6d 65 6e 75 0d 09 42 | 05 cc 0d 09 4c 3f 24 74 | menu..B|....L?$t|
|00001970| 62 25 3d c0 74 24 2c 67 | 25 2d 31 29 3a 70 74 72 |b%=.t$,g|%-1):ptr|
|00001980| 25 21 31 32 3d 74 62 25 | 3a 70 74 72 25 21 31 36 |%!12=tb%|:ptr%!16|
|00001990| 3d 2d 31 3a 70 74 72 25 | 21 32 30 3d a9 24 74 62 |=-1:ptr%|!20=.$tb|
|000019a0| 25 3a 74 62 25 2b 3d 32 | 34 0d 09 56 05 cd 0d 09 |%:tb%+=2|4..V....|
|000019b0| 60 10 74 24 3d c1 74 24 | 2c 67 25 2b 31 29 0d 09 |`.t$=.t$|,g%+1)..|
|000019c0| 6a 46 21 70 74 72 25 3d | 74 69 63 6b 25 84 64 6f |jF!ptr%=|tick%.do|
|000019d0| 74 74 65 64 25 84 77 72 | 69 74 65 61 62 6c 65 25 |tted%.wr|iteable%|
|000019e0| 84 28 26 38 30 20 80 28 | 74 24 3d 22 22 29 29 3a |.(&80 .(|t$="")):|
|000019f0| f4 26 38 30 20 6d 61 72 | 6b 73 20 6c 61 73 74 20 |.&80 mar|ks last |
|00001a00| 69 74 65 6d 0d 09 74 13 | 70 74 72 25 21 34 3d 73 |item..t.|ptr%!4=s|
|00001a10| 75 62 6d 65 6e 75 25 0d | 09 7e 32 70 74 72 25 21 |ubmenu%.|.~2ptr%!|
|00001a20| 38 3d 26 31 30 31 32 31 | 84 73 68 61 64 65 25 84 |8=&10121|.shade%.|
|00001a30| 77 72 69 74 65 61 62 6c | 65 25 3c 3c 36 84 37 3c |writeabl|e%<<6.7<|
|00001a40| 3c 32 34 84 30 3c 3c 32 | 38 0d 09 88 0c 70 74 72 |<24.0<<2|8....ptr|
|00001a50| 25 2b 3d 32 34 0d 09 92 | 0a fd 74 24 3d 22 22 0d |%+=24...|..t$="".|
|00001a60| 09 9c 08 3d 6d 62 25 0d | 09 a6 05 3a 0d 09 b0 10 |...=mb%.|...:....|
|00001a70| dd f2 6d 65 6e 75 73 65 | 6c 65 63 74 0d 09 ba 33 |..menuse|lect...3|
|00001a80| c8 99 22 57 69 6d 70 5f | 47 65 74 50 6f 69 6e 74 |.."Wimp_|GetPoint|
|00001a90| 65 72 49 6e 66 6f 22 2c | 2c 62 6c 6f 63 6b 25 3a |erInfo",|,block%:|
|00001aa0| 6d 65 6e 75 62 25 3d 62 | 6c 6f 63 6b 25 21 38 0d |menub%=b|lock%!8.|
|00001ab0| 09 c4 0d e7 6d 65 6e 75 | 25 3d 31 8c 0d 09 ce 0d |....menu|%=1.....|
|00001ac0| c8 8e 21 70 6f 6c 6c 25 | ca 0d 09 d8 06 c9 30 0d |..!poll%|......0.|
|00001ad0| 09 e2 0c c9 31 3a f2 71 | 75 69 74 0d 09 ec 05 cb |....1:.q|uit.....|
|00001ae0| 0d 09 f6 05 cd 0d 0a 00 | 0d e7 6d 65 6e 75 25 3d |........|..menu%=|
|00001af0| 32 8c 0d 0a 0a 0d c8 8e | 21 70 6f 6c 6c 25 ca 0d |2.......|!poll%..|
|00001b00| 0a 14 0c c9 30 3a f2 66 | 69 6e 64 0d 0a 1e 10 c9 |....0:.f|ind.....|
|00001b10| 31 3a f2 73 61 76 65 66 | 69 6c 65 0d 0a 28 11 c9 |1:.savef|ile..(..|
|00001b20| 32 3a f2 63 61 74 61 6c | 6f 67 75 65 0d 0a 32 0f |2:.catal|ogue..2.|
|00001b30| c9 33 3a f2 63 6f 6d 70 | 61 72 65 0d 0a 3c 11 c9 |.3:.comp|are..<..|
|00001b40| 34 3a f2 70 65 72 6d 61 | 6e 65 6e 74 0d 0a 46 05 |4:.perma|nent..F.|
|00001b50| cb 0d 0a 50 05 cd 0d 0a | 5a 0e e7 6d 65 6e 75 62 |...P....|Z..menub|
|00001b60| 25 3d 31 8c 0d 0a 64 27 | e7 6d 65 6e 75 25 3d 31 |%=1...d'|.menu%=1|
|00001b70| 62 25 3d 69 6e 69 74 62 | 6c 6f 63 6b 25 8b 62 25 |b%=initb|lock%.b%|
|00001b80| 3d 6d 61 69 6e 62 6c 6f | 63 6b 25 0d 0a 6e 3a c8 |=mainblo|ck%..n:.|
|00001b90| 99 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e |."Wimp_C|reateMen|
|00001ba0| 75 22 2c 30 2c 62 25 2c | 6d 6f 75 73 65 78 25 2b |u",0,b%,|mousex%+|
|00001bb0| 36 34 2a 28 6d 65 6e 75 | 62 25 3d 31 29 2c 6d 6f |64*(menu|b%=1),mo|
|00001bc0| 75 73 65 79 25 0d 0a 78 | 05 cd 0d 0a 82 05 e1 0d |usey%..x|........|
|00001bd0| 0a 8c 05 3a 0d 0a 96 2a | 2a 2a 2a 2a 2a 2a 2a 2a |...:...*|********|
|00001be0| 2a 2a 20 4d 65 73 73 61 | 67 65 20 72 6f 75 74 69 |** Messa|ge routi|
|00001bf0| 6e 65 73 20 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0d 0a |nes ****|******..|
|00001c00| a0 05 3a 0d 0a aa 17 dd | f2 6d 65 73 73 61 67 65 |..:.....|.message|
|00001c10| 69 6e 28 65 76 65 6e 74 | 25 29 0d 0a b4 1e 74 61 |in(event|%)....ta|
|00001c20| 73 6b 25 3d 70 6f 6c 6c | 25 21 34 3a 72 65 66 25 |sk%=poll|%!4:ref%|
|00001c30| 3d 70 6f 6c 6c 25 21 38 | 0d 0a be 0f c8 8e 70 6f |=poll%!8|......po|
|00001c40| 6c 6c 25 21 31 36 ca 0d | 0a c8 0c c9 30 3a f2 71 |ll%!16..|....0:.q|
|00001c50| 75 69 74 0d 0a d2 16 c9 | 31 3a e7 74 61 73 6b 25 |uit.....|1:.task%|
|00001c60| 3d 6d 79 74 61 73 6b 25 | 8c 0d 0a dc 35 6a 25 3d |=mytask%|....5j%=|
|00001c70| a4 61 6c 65 72 74 28 22 | 43 61 6e 27 74 20 73 61 |.alert("|Can't sa|
|00001c80| 76 65 20 74 6f 20 44 7a | 61 70 27 73 20 6f 77 6e |ve to Dz|ap's own|
|00001c90| 20 77 69 6e 64 6f 77 21 | 22 2c 32 2c 30 29 0d 0a | window!|",2,0)..|
|00001ca0| e6 05 cc 0d 0a f0 10 f2 | 72 65 70 6c 79 28 31 38 |........|reply(18|
|00001cb0| 2c 36 29 0d 0a fa 05 cd | 0d 0b 04 06 c9 32 0d 0b |,6).....|.....2..|
|00001cc0| 0e 10 c8 8e 64 72 61 67 | 66 72 6f 6d 25 ca 0d 0b |....drag|from%...|
|00001cd0| 18 0b c9 73 61 76 65 31 | 25 0d 0b 22 1c 20 20 24 |...save1|%..".  $|
|00001ce0| 66 69 6c 65 25 3d a4 6e | 61 6d 65 28 70 6f 6c 6c |file%=.n|ame(poll|
|00001cf0| 25 2b 34 34 29 0d 0b 2c | 29 20 20 ff 28 22 53 41 |%+44)..,|)  .("SA|
|00001d00| 56 45 20 22 2b 24 66 69 | 6c 65 25 2b 22 20 22 2b |VE "+$fi|le%+" "+|
|00001d10| c3 7e 53 25 2b 22 2b 22 | 2b c3 7e 4c 25 29 0d 0b |.~S%+"+"|+.~L%)..|
|00001d20| 36 23 20 20 f2 63 6c 6f | 73 65 77 69 6e 64 6f 77 |6#  .clo|sewindow|
|00001d30| 28 73 61 76 65 31 25 29 | 3a 73 61 76 65 31 25 3d |(save1%)|:save1%=|
|00001d40| 30 0d 0b 40 05 cb 0d 0b | 4a 1f ff 28 22 53 45 54 |0..@....|J..("SET|
|00001d50| 54 59 50 45 20 22 2b 24 | 66 69 6c 65 25 2b 22 20 |TYPE "+$|file%+" |
|00001d60| 46 46 44 22 29 0d 0b 54 | 23 c8 99 22 57 69 6d 70 |FFD")..T|#.."Wimp|
|00001d70| 5f 47 65 74 50 6f 69 6e | 74 65 72 49 6e 66 6f 22 |_GetPoin|terInfo"|
|00001d80| 2c 2c 62 6c 6f 63 6b 25 | 0d 0b 5e 2b 62 6c 6f 63 |,,block%|..^+bloc|
|00001d90| 6b 25 21 32 30 3d 62 6c | 6f 63 6b 25 21 31 32 3a |k%!20=bl|ock%!12:|
|00001da0| 62 6c 6f 63 6b 25 21 32 | 34 3d 62 6c 6f 63 6b 25 |block%!2|4=block%|
|00001db0| 21 31 36 0d 0b 68 28 62 | 6c 6f 63 6b 25 21 32 38 |!16..h(b|lock%!28|
|00001dc0| 3d 21 62 6c 6f 63 6b 25 | 3a 62 6c 6f 63 6b 25 21 |=!block%|:block%!|
|00001dd0| 33 32 3d 62 6c 6f 63 6b | 25 21 34 0d 0b 72 1e 62 |32=block|%!4..r.b|
|00001de0| 6c 6f 63 6b 25 21 33 36 | 3d 30 3a 62 6c 6f 63 6b |lock%!36|=0:block|
|00001df0| 25 21 34 30 3d 26 46 46 | 44 0d 0b 7c 0e 21 62 6c |%!40=&FF|D..|.!bl|
|00001e00| 6f 63 6b 25 3d 36 34 0d | 0b 86 1e 62 6c 6f 63 6b |ock%=64.|...block|
|00001e10| 25 21 31 32 3d 72 65 66 | 25 3a 62 6c 6f 63 6b 25 |%!12=ref|%:block%|
|00001e20| 21 31 36 3d 33 0d 0b 90 | 10 f2 72 65 70 6c 79 28 |!16=3...|..reply(|
|00001e30| 31 37 2c 33 29 0d 0b 9a | 1b c8 99 22 57 69 6d 70 |17,3)...|..."Wimp|
|00001e40| 5f 43 72 65 61 74 65 4d | 65 6e 75 22 2c 2c 2d 31 |_CreateM|enu",,-1|
|00001e50| 0d 0b a4 22 c9 26 35 30 | 32 3a f2 68 65 6c 70 28 |...".&50|2:.help(|
|00001e60| 70 6f 6c 6c 25 21 33 32 | 2c 70 6f 6c 6c 25 21 33 |poll%!32|,poll%!3|
|00001e70| 36 29 0d 0b ae 05 cb 0d | 0b b8 05 e1 0d 0b c2 05 |6)......|........|
|00001e80| 3a 0d 0b cc 14 dd a4 6e | 61 6d 65 28 73 25 29 3a |:......n|ame(s%):|
|00001e90| 66 24 3d 22 22 0d 0b d6 | 1c c8 95 3f 73 25 3e 30 |f$=""...|...?s%>0|
|00001ea0| 3a 66 24 2b 3d bd 28 3f | 73 25 29 3a 73 25 2b 3d |:f$+=.(?|s%):s%+=|
|00001eb0| 31 0d 0b e0 05 ce 0d 0b | ea 07 3d 66 24 0d 0b f4 |1.......|..=f$...|
|00001ec0| 05 3a 0d 0b fe 12 dd a4 | 66 69 6c 65 6e 61 6d 65 |.:......|filename|
|00001ed0| 28 61 24 29 0d 0c 08 10 | c8 95 a7 61 24 2c 22 3a |(a$)....|...a$,":|
|00001ee0| 22 29 3e 30 0d 0c 12 16 | 61 24 3d c1 61 24 2c a7 |")>0....|a$=.a$,.|
|00001ef0| 61 24 2c 22 3a 22 29 2b | 31 29 0d 0c 1c 05 ce 0d |a$,":")+|1)......|
|00001f00| 0c 26 10 c8 95 a7 61 24 | 2c 22 2e 22 29 3e 30 0d |.&....a$|,".")>0.|
|00001f10| 0c 30 16 61 24 3d c1 61 | 24 2c a7 61 24 2c 22 2e |.0.a$=.a|$,.a$,".|
|00001f20| 22 29 2b 31 29 0d 0c 3a | 05 ce 0d 0c 44 07 3d 61 |")+1)..:|....D.=a|
|00001f30| 24 0d 0c 4e 05 3a 0d 0c | 58 1e dd f2 72 65 70 6c |$..N.:..|X...repl|
|00001f40| 79 28 6d 65 73 73 74 79 | 70 65 25 2c 72 65 61 73 |y(messty|pe%,reas|
|00001f50| 6f 6e 25 29 0d 0c 62 22 | 70 6f 6c 6c 25 21 31 32 |on%)..b"|poll%!12|
|00001f60| 3d 72 65 66 25 3a 70 6f | 6c 6c 25 21 31 36 3d 72 |=ref%:po|ll%!16=r|
|00001f70| 65 61 73 6f 6e 25 0d 0c | 6c 2e c8 99 22 57 69 6d |eason%..|l..."Wim|
|00001f80| 70 5f 53 65 6e 64 4d 65 | 73 73 61 67 65 22 2c 6d |p_SendMe|ssage",m|
|00001f90| 65 73 73 74 79 70 65 25 | 2c 70 6f 6c 6c 25 2c 74 |esstype%|,poll%,t|
|00001fa0| 61 73 6b 25 0d 0c 76 05 | e1 0d 0c 80 05 3a 0d 0c |ask%..v.|.....:..|
|00001fb0| 8a 17 dd f2 68 65 6c 70 | 28 77 25 2c 69 25 29 3a |....help|(w%,i%):|
|00001fc0| c8 8e 77 25 ca 0d 0c 94 | 54 c9 2d 32 3a 6d 24 3d |..w%....|T.-2:m$=|
|00001fd0| 22 43 6c 69 63 6b 20 5b | 53 65 6c 65 63 74 5d 20 |"Click [|Select] |
|00001fe0| 74 6f 20 73 74 61 72 74 | 20 74 68 65 20 70 72 6f |to start| the pro|
|00001ff0| 67 72 61 6d 20 3a 20 5b | 4d 65 6e 75 5d 20 66 6f |gram : [|Menu] fo|
|00002000| 72 20 69 6e 66 6f 20 61 | 6e 64 20 6f 74 68 65 72 |r info a|nd other|
|00002010| 20 6f 70 74 69 6f 6e 73 | 22 0d 0c 9e 4f c9 63 61 | options|"...O.ca|
|00002020| 74 25 3a 6d 24 3d 22 54 | 68 69 73 20 77 69 6e 64 |t%:m$="T|his wind|
|00002030| 6f 77 20 64 69 73 70 6c | 61 79 73 20 66 69 6c 65 |ow displ|ays file|
|00002040| 20 69 6e 66 6f 72 6d 61 | 74 69 6f 6e 20 66 6f 72 | informa|tion for|
|00002050| 20 61 20 70 61 72 74 69 | 63 75 6c 61 72 20 63 61 | a parti|cular ca|
|00002060| 74 61 6c 6f 67 75 65 22 | 0d 0c a8 6d c9 73 61 76 |talogue"|...m.sav|
|00002070| 65 25 3a 6d 24 3d 22 55 | 73 65 20 74 68 65 20 8b |e%:m$="U|se the .|
|00002080| 20 8a 20 69 63 6f 6e 73 | 20 74 6f 20 73 65 74 20 | . icons| to set |
|00002090| 74 68 65 20 73 74 61 72 | 74 20 61 6e 64 20 65 6e |the star|t and en|
|000020a0| 64 20 61 64 64 72 65 73 | 73 65 73 20 6f 66 20 74 |d addres|ses of t|
|000020b0| 68 65 20 70 61 72 74 20 | 6f 66 20 74 68 65 20 64 |he part |of the d|
|000020c0| 69 73 6b 20 79 6f 75 20 | 77 69 73 68 20 74 6f 20 |isk you |wish to |
|000020d0| 73 61 76 65 22 0d 0c b2 | 6f c9 63 6f 6d 70 25 3a |save"...|o.comp%:|
|000020e0| 6d 24 3d 22 55 73 65 20 | 74 68 65 20 8b 20 8a 20 |m$="Use |the . . |
|000020f0| 69 63 6f 6e 73 20 74 6f | 20 73 65 74 20 74 68 65 |icons to| set the|
|00002100| 20 73 74 61 72 74 20 61 | 6e 64 20 65 6e 64 20 61 | start a|nd end a|
|00002110| 64 64 72 65 73 73 65 73 | 20 6f 66 20 74 68 65 20 |ddresses| of the |
|00002120| 70 61 72 74 20 6f 66 20 | 74 68 65 20 64 69 73 6b |part of |the disk|
|00002130| 20 79 6f 75 20 77 69 73 | 68 20 74 6f 20 73 65 61 | you wis|h to sea|
|00002140| 72 63 68 22 0d 0c bc a9 | c9 73 61 76 65 31 25 3a |rch"....|.save1%:|
|00002150| 6d 24 3d 22 44 72 61 67 | 20 74 68 65 20 69 63 6f |m$="Drag| the ico|
|00002160| 6e 20 74 6f 20 74 68 65 | 20 77 69 6e 64 6f 77 20 |n to the| window |
|00002170| 69 6e 20 77 68 69 63 68 | 20 79 6f 75 20 77 69 73 |in which| you wis|
|00002180| 68 20 74 6f 20 73 61 76 | 65 20 74 68 65 20 66 69 |h to sav|e the fi|
|00002190| 6c 65 2c 20 6f 72 20 69 | 66 20 74 68 65 72 65 20 |le, or i|f there |
|000021a0| 69 73 20 61 6c 72 65 61 | 64 79 20 61 20 66 75 6c |is alrea|dy a ful|
|000021b0| 6c 20 66 69 6c 65 6e 61 | 6d 65 20 63 6c 69 63 6b |l filena|me click|
|000021c0| 20 6f 6e 20 27 4f 4b 27 | 2e 20 3c 45 73 63 61 70 | on 'OK'|. <Escap|
|000021d0| 65 3e 20 77 69 6c 6c 20 | 63 61 6e 63 65 6c 20 74 |e> will |cancel t|
|000021e0| 68 65 20 6f 70 65 72 61 | 74 69 6f 6e 22 0d 0c c6 |he opera|tion"...|
|000021f0| 44 c9 73 61 76 65 73 65 | 63 25 3a 6d 24 3d 22 43 |D.savese|c%:m$="C|
|00002200| 6c 69 63 6b 20 27 4f 4b | 27 20 74 6f 20 72 65 73 |lick 'OK|' to res|
|00002210| 61 76 65 20 74 68 69 73 | 20 73 65 63 74 6f 72 20 |ave this| sector |
|00002220| 62 61 63 6b 20 74 6f 20 | 74 68 65 20 64 69 73 6b |back to |the disk|
|00002230| 22 0d 0c d0 9a c9 66 69 | 6e 64 25 3a 6d 24 3d 22 |".....fi|nd%:m$="|
|00002240| 45 6e 74 65 72 20 74 68 | 65 20 34 2d 63 68 61 72 |Enter th|e 4-char|
|00002250| 61 63 74 65 72 20 73 74 | 72 69 6e 67 20 79 6f 75 |acter st|ring you|
|00002260| 20 77 69 73 68 20 74 6f | 20 66 69 6e 64 2e 20 48 | wish to| find. H|
|00002270| 65 78 61 64 65 63 69 6d | 61 6c 20 69 6e 70 75 74 |exadecim|al input|
|00002280| 20 69 73 20 61 6c 73 6f | 20 61 63 63 65 70 74 65 | is also| accepte|
|00002290| 64 20 28 75 70 20 74 6f | 20 38 20 63 68 61 72 61 |d (up to| 8 chara|
|000022a0| 63 74 65 72 73 29 20 70 | 72 6f 76 69 64 65 64 20 |cters) p|rovided |
|000022b0| 74 68 65 20 66 69 72 73 | 74 20 63 68 61 72 61 63 |the firs|t charac|
|000022c0| 74 65 72 20 69 73 20 27 | 26 27 22 0d 0c da 9e c9 |ter is '|&'".....|
|000022d0| 66 69 6e 64 31 25 2c 63 | 61 74 31 25 2c 63 6f 6d |find1%,c|at1%,com|
|000022e0| 70 31 25 3a 6d 24 3d 22 | 43 6c 69 63 6b 20 6f 6e |p1%:m$="|Click on|
|000022f0| 20 27 43 6f 6e 74 69 6e | 75 65 27 20 74 6f 20 63 | 'Contin|ue' to c|
|00002300| 6f 6e 74 69 6e 75 65 20 | 74 68 65 20 73 65 61 72 |ontinue |the sear|
|00002310| 63 68 20 74 6f 20 74 68 | 65 20 65 6e 64 20 6f 66 |ch to th|e end of|
|00002320| 20 74 68 65 20 64 69 73 | 6b 20 6f 72 20 75 6e 74 | the dis|k or unt|
|00002330| 69 6c 20 45 73 63 61 70 | 65 20 69 73 20 70 72 65 |il Escap|e is pre|
|00002340| 73 73 65 64 2c 20 6f 72 | 20 6f 6e 20 27 43 61 6e |ssed, or| on 'Can|
|00002350| 63 65 6c 27 20 74 6f 20 | 61 62 6f 72 74 20 74 68 |cel' to |abort th|
|00002360| 65 20 73 65 61 72 63 68 | 22 0d 0c e4 b9 c9 64 69 |e search|".....di|
|00002370| 73 70 6c 61 79 25 3a 6d | 24 3d 22 43 6c 69 63 6b |splay%:m|$="Click|
|00002380| 20 5b 53 65 6c 65 63 74 | 5d 20 69 6e 20 74 68 65 | [Select|] in the|
|00002390| 20 72 69 67 68 74 20 68 | 61 6e 64 20 70 61 72 74 | right h|and part|
|000023a0| 20 74 6f 20 65 6e 74 65 | 72 20 41 53 43 49 49 20 | to ente|r ASCII |
|000023b0| 63 68 61 72 61 63 74 65 | 72 73 2c 20 69 6e 20 74 |characte|rs, in t|
|000023c0| 68 65 20 6c 65 66 74 20 | 68 61 6e 64 20 70 61 72 |he left |hand par|
|000023d0| 74 20 66 6f 72 20 68 65 | 78 20 65 6e 74 72 79 2e |t for he|x entry.|
|000023e0| 20 28 59 6f 75 20 6d 75 | 73 74 20 70 6f 73 69 74 | (You mu|st posit|
|000023f0| 69 6f 6e 20 74 68 65 20 | 63 61 72 65 74 20 77 69 |ion the |caret wi|
|00002400| 74 68 20 74 68 65 20 6d | 6f 75 73 65 20 66 6f 72 |th the m|ouse for|
|00002410| 20 65 61 63 68 20 68 65 | 78 20 6e 75 6d 62 65 72 | each he|x number|
|00002420| 29 22 0d 0c ee a5 c9 6f | 70 65 6e 25 3a e7 69 25 |)".....o|pen%:.i%|
|00002430| 3d 31 36 6d 24 3d 22 43 | 6c 69 63 6b 20 6f 6e 20 |=16m$="C|lick on |
|00002440| 74 68 69 73 20 74 6f 20 | 64 69 73 70 6c 61 79 20 |this to |display |
|00002450| 74 68 65 20 73 65 63 74 | 6f 72 22 8b 6d 24 3d 22 |the sect|or".m$="|
|00002460| 55 73 65 20 74 68 65 20 | 8b 20 8a 20 69 63 6f 6e |Use the |. . icon|
|00002470| 73 20 74 6f 20 73 65 74 | 20 74 68 65 20 64 72 69 |s to set| the dri|
|00002480| 76 65 2c 20 74 72 61 63 | 6b 2c 20 68 65 61 64 20 |ve, trac|k, head |
|00002490| 61 6e 64 20 73 65 63 74 | 6f 72 20 6e 75 6d 62 65 |and sect|or numbe|
|000024a0| 72 73 2e 20 27 4f 4b 27 | 20 64 69 73 70 6c 61 79 |rs. 'OK'| display|
|000024b0| 73 20 74 68 65 20 73 65 | 6c 65 63 74 65 64 20 73 |s the se|lected s|
|000024c0| 65 63 74 6f 72 2e 22 0d | 0c f8 1b 7f 3a 6d 24 3d |ector.".|....:m$=|
|000024d0| 22 4e 6f 20 68 65 6c 70 | 20 70 72 6f 76 69 64 65 |"No help| provide|
|000024e0| 64 22 0d 0d 02 05 cb 0d | 0d 0c 22 70 6f 6c 6c 25 |d"......|.."poll%|
|000024f0| 21 31 32 3d 70 6f 6c 6c | 25 21 38 3a 70 6f 6c 6c |!12=poll|%!8:poll|
|00002500| 25 21 31 36 3d 26 35 30 | 33 0d 0d 16 16 21 70 6f |%!16=&50|3....!po|
|00002510| 6c 6c 25 3d 28 a9 6d 24 | 2b 32 35 29 80 2d 34 0d |ll%=(.m$|+25).-4.|
|00002520| 0d 20 15 24 28 70 6f 6c | 6c 25 2b 32 30 29 3d 6d |. .$(pol|l%+20)=m|
|00002530| 24 2b bd 30 0d 0d 2a 29 | c8 99 22 57 69 6d 70 5f |$+.0..*)|.."Wimp_|
|00002540| 53 65 6e 64 4d 65 73 73 | 61 67 65 22 2c 31 37 2c |SendMess|age",17,|
|00002550| 70 6f 6c 6c 25 2c 70 6f | 6c 6c 25 21 34 0d 0d 34 |poll%,po|ll%!4..4|
|00002560| 05 e1 0d 0d 3e 05 3a 0d | 0d 48 27 2a 2a 2a 2a 2a |....>.:.|.H'*****|
|00002570| 2a 2a 2a 2a 2a 20 49 63 | 6f 6e 20 72 6f 75 74 69 |***** Ic|on routi|
|00002580| 6e 65 73 20 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0d 0d |nes ****|******..|
|00002590| 52 05 3a 0d 0d 5c 1f dd | f2 69 6e 76 65 72 74 69 |R.:..\..|.inverti|
|000025a0| 63 6f 6e 28 77 69 6e 64 | 6f 77 25 2c 69 63 6f 6e |con(wind|ow%,icon|
|000025b0| 25 29 0d 0d 66 3f 21 62 | 6c 6f 63 6b 25 3d 77 69 |%)..f?!b|lock%=wi|
|000025c0| 6e 64 6f 77 25 3a 62 6c | 6f 63 6b 25 21 34 3d 69 |ndow%:bl|ock%!4=i|
|000025d0| 63 6f 6e 25 3a 62 6c 6f | 63 6b 25 21 38 3d 26 32 |con%:blo|ck%!8=&2|
|000025e0| 30 30 30 30 30 3a 62 6c | 6f 63 6b 25 21 31 32 3d |00000:bl|ock%!12=|
|000025f0| 30 0d 0d 70 24 c8 99 22 | 57 69 6d 70 5f 53 65 74 |0..p$.."|Wimp_Set|
|00002600| 49 63 6f 6e 53 74 61 74 | 65 22 2c 30 2c 62 6c 6f |IconStat|e",0,blo|
|00002610| 63 6b 25 3a e1 0d 0d 7a | 05 3a 0d 0d 84 21 dd f2 |ck%:...z|.:...!..|
|00002620| 73 65 74 69 63 6f 6e 28 | 77 69 6e 64 6f 77 25 2c |seticon(|window%,|
|00002630| 69 63 6f 6e 25 2c 63 6f | 6c 25 29 0d 0d 8e 48 21 |icon%,co|l%)...H!|
|00002640| 62 6c 6f 63 6b 25 3d 77 | 69 6e 64 6f 77 25 3a 62 |block%=w|indow%:b|
|00002650| 6c 6f 63 6b 25 21 34 3d | 69 63 6f 6e 25 3a 62 6c |lock%!4=|icon%:bl|
|00002660| 6f 63 6b 25 21 38 3d 63 | 6f 6c 25 3c 3c 32 38 3a |ock%!8=c|ol%<<28:|
|00002670| 62 6c 6f 63 6b 25 21 31 | 32 3d 26 46 30 30 30 30 |block%!1|2=&F0000|
|00002680| 30 30 30 0d 0d 98 24 c8 | 99 22 57 69 6d 70 5f 53 |000...$.|."Wimp_S|
|00002690| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 30 2c 62 |etIconSt|ate",0,b|
|000026a0| 6c 6f 63 6b 25 3a e1 0d | 0d a2 05 3a 0d 0d ac 43 |lock%:..|...:...C|
|000026b0| dd a4 69 63 6f 6e 73 65 | 74 28 69 25 29 3a 21 71 |..iconse|t(i%):!q|
|000026c0| 32 25 3d 6f 70 74 69 6f | 6e 73 25 3a 71 32 25 21 |2%=optio|ns%:q2%!|
|000026d0| 34 3d 69 25 3a c8 99 22 | 57 69 6d 70 5f 47 65 74 |4=i%:.."|Wimp_Get|
|000026e0| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 71 32 25 0d |IconStat|e",,q2%.|
|000026f0| 0d b6 18 3d 28 28 71 32 | 25 21 32 34 80 31 3c 3c |...=((q2|%!24.1<<|
|00002700| 32 31 29 3c 3e 30 29 0d | 0d c0 05 3a 0d 0d ca 0f |21)<>0).|...:....|
|00002710| dd f2 69 63 6f 6e 73 28 | 68 25 29 0d 0d d4 3b e3 |..icons(|h%)...;.|
|00002720| 69 25 3d 31 b8 6e 69 63 | 6f 6e 73 25 3a f3 62 78 |i%=1.nic|ons%:.bx|
|00002730| 25 2c 62 79 25 2c 74 78 | 24 2c 74 79 25 2c 62 67 |%,by%,tx|$,ty%,bg|
|00002740| 25 2c 66 67 25 2c 66 6c | 67 25 2c 69 24 3a 74 78 |%,fg%,fl|g%,i$:tx|
|00002750| 25 3d a0 74 78 24 0d 0d | de 2b e7 c0 69 24 2c 32 |%=.tx$..|.+..i$,2|
|00002760| 29 3d 22 46 4e 22 61 24 | 3d 22 22 8b e7 a7 69 24 |)="FN"a$|=""...i$|
|00002770| 2c 22 24 22 29 61 24 3d | a0 69 24 8b 61 24 3d 69 |,"$")a$=|.i$.a$=i|
|00002780| 24 0d 0d e8 35 f2 63 72 | 65 61 74 65 69 63 6f 6e |$...5.cr|eateicon|
|00002790| 28 68 25 2c 62 78 25 2c | 62 79 25 2c 74 78 25 2c |(h%,bx%,|by%,tx%,|
|000027a0| 74 79 25 2c 62 67 25 2c | 66 67 25 2c 66 6c 67 25 |ty%,bg%,|fg%,flg%|
|000027b0| 2c 30 2c 61 24 29 0d 0d | f2 16 e7 c0 69 24 2c 32 |,0,a$)..|....i$,2|
|000027c0| 29 3d 22 46 4e 22 6a 25 | 3d a0 69 24 0d 0d fc 07 |)="FN"j%|=.i$....|
|000027d0| ed 3a e1 0d 0e 06 05 3a | 0d 0e 10 41 dd f2 63 72 |.:.....:|...A..cr|
|000027e0| 65 61 74 65 69 63 6f 6e | 28 77 69 6e 64 6f 77 25 |eateicon|(window%|
|000027f0| 2c 62 78 25 2c 62 79 25 | 2c 74 78 25 2c 74 79 25 |,bx%,by%|,tx%,ty%|
|00002800| 2c 62 67 25 2c 66 67 25 | 2c 66 6c 67 25 2c 65 73 |,bg%,fg%|,flg%,es|
|00002810| 67 25 2c 64 61 74 61 24 | 29 0d 0e 1a 07 ea 69 25 |g%,data$|).....i%|
|00002820| 0d 0e 24 2d 21 62 6c 6f | 63 6b 25 3d 77 69 6e 64 |..$-!blo|ck%=wind|
|00002830| 6f 77 25 3a 62 6c 6f 63 | 6b 25 21 34 3d 62 78 25 |ow%:bloc|k%!4=bx%|
|00002840| 3a 62 6c 6f 63 6b 25 21 | 38 3d 62 79 25 0d 0e 2e |:block%!|8=by%...|
|00002850| 1f 62 6c 6f 63 6b 25 21 | 31 32 3d 74 78 25 3a 62 |.block%!|12=tx%:b|
|00002860| 6c 6f 63 6b 25 21 31 36 | 3d 74 79 25 0d 0e 38 2b |lock%!16|=ty%..8+|
|00002870| 62 6c 6f 63 6b 25 21 32 | 30 3d 66 6c 67 25 84 65 |block%!2|0=flg%.e|
|00002880| 73 67 25 3c 3c 31 36 84 | 66 67 25 3c 3c 32 34 84 |sg%<<16.|fg%<<24.|
|00002890| 62 67 25 3c 3c 32 38 0d | 0e 42 14 e7 62 6c 6f 63 |bg%<<28.|.B..bloc|
|000028a0| 6b 25 21 32 30 80 26 31 | 30 30 8c 0d 0e 4c 18 6a |k%!20.&1|00...L.j|
|000028b0| 25 3d a7 64 61 74 61 24 | 2c 22 3b 22 29 3a 62 25 |%=.data$|,";"):b%|
|000028c0| 3d 2d 31 0d 0e 56 08 e7 | 6a 25 8c 0d 0e 60 13 62 |=-1..V..|j%...`.b|
|000028d0| 24 3d c1 64 61 74 61 24 | 2c 6a 25 2b 31 29 0d 0e |$=.data$|,j%+1)..|
|000028e0| 6a 1f 69 25 3d a7 62 24 | 2c 22 2c 22 29 3a 62 25 |j.i%=.b$|,","):b%|
|000028f0| 3d a0 c1 62 24 2c 31 2c | 69 25 2d 31 29 0d 0e 74 |=..b$,1,|i%-1)..t|
|00002900| 11 24 62 25 3d c1 62 24 | 2c 69 25 2b 31 29 0d 0e |.$b%=.b$|,i%+1)..|
|00002910| 7e 05 cd 0d 0e 88 2a 69 | 25 3d a7 64 61 74 61 24 |~.....*i|%=.data$|
|00002920| 2c 22 2c 22 29 3a 62 6c | 6f 63 6b 25 21 32 34 3d |,","):bl|ock%!24=|
|00002930| a0 c0 64 61 74 61 24 2c | 69 25 2d 31 29 0d 0e 92 |..data$,|i%-1)...|
|00002940| 28 62 6c 6f 63 6b 25 21 | 32 38 3d 62 25 3a 62 6c |(block%!|28=b%:bl|
|00002950| 6f 63 6b 25 21 33 32 3d | a0 c1 64 61 74 61 24 2c |ock%!32=|..data$,|
|00002960| 69 25 2b 31 29 0d 0e 9c | 08 e7 6a 25 8c 0d 0e a6 |i%+1)...|..j%....|
|00002970| 15 69 25 3d a7 64 61 74 | 61 24 2c 22 2c 22 2c 6a |.i%=.dat|a$,",",j|
|00002980| 25 29 0d 0e b0 1b 62 6c | 6f 63 6b 25 21 32 38 3d |%)....bl|ock%!28=|
|00002990| a0 c1 64 61 74 61 24 2c | 69 25 2d 31 29 0d 0e ba |..data$,|i%-1)...|
|000029a0| 05 cc 0d 0e c4 10 62 6c | 6f 63 6b 25 21 32 38 3d |......bl|ock%!28=|
|000029b0| 2d 31 0d 0e ce 05 cd 0d | 0e d8 05 cc 0d 0e e2 1b |-1......|........|
|000029c0| 24 28 62 6c 6f 63 6b 25 | 2b 32 34 29 3d c0 64 61 |$(block%|+24)=.da|
|000029d0| 74 61 24 2c 31 31 29 0d | 0e ec 05 cd 0d 0e f6 20 |ta$,11).|....... |
|000029e0| c8 99 22 57 69 6d 70 5f | 43 72 65 61 74 65 49 63 |.."Wimp_|CreateIc|
|000029f0| 6f 6e 22 2c 30 2c 62 6c | 6f 63 6b 25 0d 0f 00 05 |on",0,bl|ock%....|
|00002a00| e1 0d 0f 0a 05 3a 0d 0f | 14 26 2a 2a 2a 2a 2a 2a |.....:..|.&******|
|00002a10| 2a 2a 2a 2a 20 44 69 61 | 6c 6f 67 20 62 6f 78 65 |**** Dia|log boxe|
|00002a20| 73 20 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 0d 0f 1e 05 |s ******|****....|
|00002a30| 3a 0d 0f 28 33 dd a4 63 | 72 65 61 74 65 64 69 61 |:..(3..c|reatedia|
|00002a40| 6c 6f 67 28 63 6f 6c 25 | 2c 70 6f 73 25 2c 66 6c |log(col%|,pos%,fl|
|00002a50| 61 67 25 2c 74 69 74 6c | 65 24 2c f8 20 63 6c 61 |ag%,titl|e$,. cla|
|00002a60| 69 6d 24 29 0d 0f 32 47 | ea 6e 69 63 6f 6e 73 25 |im$)..2G|.nicons%|
|00002a70| 2c 77 69 64 74 68 25 2c | 68 65 69 67 68 74 25 2c |,width%,|height%,|
|00002a80| 78 25 2c 79 25 2c 69 25 | 2c 68 25 2c 62 78 25 2c |x%,y%,i%|,h%,bx%,|
|00002a90| 62 79 25 2c 74 78 25 2c | 74 79 25 2c 62 67 25 2c |by%,tx%,|ty%,bg%,|
|00002aa0| 66 67 25 2c 66 6c 67 25 | 2c 69 24 0d 0f 3c 1a c8 |fg%,flg%|,i$..<..|
|00002ab0| 97 6d 6f 75 73 65 78 25 | 2c 6d 6f 75 73 65 79 25 |.mousex%|,mousey%|
|00002ac0| 2c 62 75 74 25 0d 0f 46 | 22 f3 63 6c 61 69 6d 24 |,but%..F|".claim$|
|00002ad0| 2c 6e 69 63 6f 6e 73 25 | 2c 77 69 64 74 68 24 2c |,nicons%|,width$,|
|00002ae0| 68 65 69 67 68 74 25 0d | 0f 50 1e 77 69 64 74 68 |height%.|.P.width|
|00002af0| 25 3d a0 77 69 64 74 68 | 24 3a 68 65 69 67 68 74 |%=.width|$:height|
|00002b00| 25 2b 3d 34 30 0d 0f 5a | 28 78 25 3d 6d 6f 75 73 |%+=40..Z|(x%=mous|
|00002b10| 65 78 25 3a e7 78 25 2b | 77 69 64 74 68 25 3e 31 |ex%:.x%+|width%>1|
|00002b20| 32 38 30 78 25 2d 3d 77 | 69 64 74 68 25 0d 0f 64 |280x%-=w|idth%..d|
|00002b30| 20 79 25 3d 6d 6f 75 73 | 65 79 25 2d 68 65 69 67 | y%=mous|ey%-heig|
|00002b40| 68 74 25 3a e7 79 25 3c | 30 79 25 3d 30 0d 0f 6e |ht%:.y%<|0y%=0..n|
|00002b50| 65 68 25 3d a4 63 72 65 | 61 74 65 77 69 6e 64 6f |eh%=.cre|atewindo|
|00002b60| 77 28 74 69 74 6c 65 24 | 2c 26 39 33 2c 66 6c 61 |w(title$|,&93,fla|
|00002b70| 67 25 2c 63 6f 6c 25 2c | 77 69 64 74 68 25 2c 68 |g%,col%,|width%,h|
|00002b80| 65 69 67 68 74 25 2c 78 | 25 2c 79 25 2c 78 25 2b |eight%,x|%,y%,x%+|
|00002b90| 77 69 64 74 68 25 2c 79 | 25 2b 68 65 69 67 68 74 |width%,y|%+height|
|00002ba0| 25 2c 30 2c 26 33 30 30 | 30 2c 2d 31 2c 70 6f 73 |%,0,&300|0,-1,pos|
|00002bb0| 25 29 0d 0f 78 28 f2 69 | 63 6f 6e 73 28 68 25 29 |%)..x(.i|cons(h%)|
|00002bc0| 3a f2 6f 70 65 6e 77 69 | 6e 64 6f 77 28 68 25 2c |:.openwi|ndow(h%,|
|00002bd0| 62 6c 6f 63 6b 25 2c 2d | 31 29 0d 0f 82 07 3d 68 |block%,-|1)....=h|
|00002be0| 25 0d 0f 8c 05 3a 0d 0f | 96 24 dd f2 63 6c 69 63 |%....:..|.$..clic|
|00002bf0| 6b 64 69 61 6c 6f 67 28 | f8 20 64 68 25 2c f8 20 |kdialog(|. dh%,. |
|00002c00| 63 6c 24 2c 69 63 6f 6e | 25 29 0d 0f a0 15 e7 63 |cl$,icon|%).....c|
|00002c10| 6c 24 3d 22 22 84 69 63 | 6f 6e 25 3d 2d 31 e1 0d |l$="".ic|on%=-1..|
|00002c20| 0f aa 26 e7 a0 28 22 46 | 4e 63 6c 69 63 6b 64 69 |..&..("F|Nclickdi|
|00002c30| 61 6c 6f 67 22 2b 63 6c | 24 2b 22 28 69 63 6f 6e |alog"+cl|$+"(icon|
|00002c40| 25 29 22 29 8c 0d 0f b4 | 22 f2 63 6c 6f 73 65 77 |%)")....|".closew|
|00002c50| 69 6e 64 6f 77 28 64 68 | 25 29 3a 64 68 25 3d 30 |indow(dh|%):dh%=0|
|00002c60| 3a 63 6c 24 3d 22 22 0d | 0f be 05 cd 0d 0f c8 05 |:cl$="".|........|
|00002c70| e1 0d 0f d2 05 3a 0d 0f | dc 22 dd a4 67 72 65 61 |.....:..|."..grea|
|00002c80| 74 65 72 28 61 25 2c 62 | 25 29 3a e7 61 25 3c 62 |ter(a%,b|%):.a%<b|
|00002c90| 25 3d 62 25 8b 3d 61 25 | 0d 0f e6 05 3a 0d 0f f0 |%=b%.=a%|....:...|
|00002ca0| 1c dd a4 77 68 69 63 68 | 28 6a 25 29 3a 3d 28 6a |...which|(j%):=(j|
|00002cb0| 25 2d 31 37 36 30 29 81 | 38 0d 0f fa 05 3a 0d 10 |%-1760).|8....:..|
|00002cc0| 04 25 dd a4 61 6c 65 72 | 74 28 6d 24 2c 69 63 25 |.%..aler|t(m$,ic%|
|00002cd0| 2c 65 72 72 25 29 3a 21 | 62 6c 6f 63 6b 25 3d 65 |,err%):!|block%=e|
|00002ce0| 72 72 25 0d 10 0e 15 24 | 28 62 6c 6f 63 6b 25 2b |rr%....$|(block%+|
|00002cf0| 34 29 3d 6d 24 2b bd 30 | 0d 10 18 2f c8 99 22 57 |4)=m$+.0|.../.."W|
|00002d00| 69 6d 70 5f 52 65 70 6f | 72 74 45 72 72 6f 72 22 |imp_Repo|rtError"|
|00002d10| 2c 62 6c 6f 63 6b 25 2c | 69 63 25 2c 22 21 44 7a |,block%,|ic%,"!Dz|
|00002d20| 61 70 22 b8 2c 72 25 0d | 10 22 07 3d 72 25 0d 10 |ap".,r%.|.".=r%..|
|00002d30| 2c 05 3a 0d 10 36 11 dd | f2 65 72 72 6f 72 3a c8 |,.:..6..|.error:.|
|00002d40| 8e 9f 20 ca 0d 10 40 10 | c9 36 37 37 34 35 3a 69 |.. ...@.|.67745:i|
|00002d50| 63 25 3d 33 0d 10 4a 36 | 72 65 70 6f 72 74 24 3d |c%=3..J6|report$=|
|00002d60| 22 50 6c 65 61 73 65 20 | 63 68 65 63 6b 20 74 68 |"Please |check th|
|00002d70| 61 74 20 61 20 64 69 73 | 6b 20 69 73 20 69 6e 20 |at a dis|k is in |
|00002d80| 74 68 65 20 64 72 69 76 | 65 22 0d 10 54 05 7f 0d |the driv|e"..T...|
|00002d90| 10 5e 23 72 65 70 6f 72 | 74 24 3d f6 24 2b 22 20 |.^#repor|t$=.$+" |
|00002da0| 61 74 20 6c 69 6e 65 20 | 22 2b c3 9e 3a 69 63 25 |at line |"+..:ic%|
|00002db0| 3d 32 0d 10 68 05 cb 0d | 10 72 1c 72 25 3d a4 61 |=2..h...|.r.r%=.a|
|00002dc0| 6c 65 72 74 28 72 65 70 | 6f 72 74 24 2c 69 63 25 |lert(rep|ort$,ic%|
|00002dd0| 2c 9f 29 0d 10 7c 09 e7 | a6 2d 32 8c 0d 10 86 13 |,.)..|..|.-2.....|
|00002de0| 40 25 3d 66 6f 72 6d 61 | 74 25 3a ef 33 2c 34 0d |@%=forma|t%:.3,4.|
|00002df0| 10 90 16 c8 99 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |....."Wi|mp_Close|
|00002e00| 44 6f 77 6e 22 0d 10 9a | 08 2a 46 58 34 0d 10 a4 |Down"...|.*FX4...|
|00002e10| 0c 2a 46 58 32 32 35 20 | 31 0d 10 ae 19 ff 28 22 |.*FX225 |1.....("|
|00002e20| 4b 45 59 39 45 44 49 54 | 22 2b c3 9e 2b 22 7c 4d |KEY9EDIT|"+..+"|M|
|00002e30| 22 29 0d 10 b8 05 e0 0d | 10 c2 05 cd 0d 10 cc 05 |")......|........|
|00002e40| e1 0d 10 d6 05 3a 0d 10 | e0 31 2a 2a 2a 2a 2a 2a |.....:..|.1******|
|00002e50| 2a 2a 2a 2a 20 49 6e 69 | 74 69 61 6c 69 73 61 74 |**** Ini|tialisat|
|00002e60| 69 6f 6e 20 72 6f 75 74 | 69 6e 65 73 20 2a 2a 2a |ion rout|ines ***|
|00002e70| 2a 2a 2a 2a 2a 2a 2a 0d | 10 ea 05 3a 0d 10 f4 0e |*******.|...:....|
|00002e80| dd f2 77 69 6d 70 69 6e | 69 74 0d 10 fe 3d de 6d |..wimpin|it...=.m|
|00002e90| 61 69 6e 62 6c 6f 63 6b | 25 32 33 30 30 2c 74 65 |ainblock|%2300,te|
|00002ea0| 78 74 62 6c 6f 63 6b 25 | 31 30 30 30 2c 69 6e 69 |xtblock%|1000,ini|
|00002eb0| 74 62 6c 6f 63 6b 25 31 | 30 30 30 2c 69 74 62 6c |tblock%1|000,itbl|
|00002ec0| 6f 63 6b 25 35 30 30 0d | 11 08 1c de 62 6c 6f 63 |ock%500.|....bloc|
|00002ed0| 6b 25 26 31 30 30 30 2c | 70 6f 6c 6c 25 33 32 2b |k%&1000,|poll%32+|
|00002ee0| 32 35 36 0d 11 12 14 de | 6d 65 73 73 25 33 30 2c |256.....|mess%30,|
|00002ef0| 64 61 74 65 25 31 30 0d | 11 1c 0f de 77 74 69 74 |date%10.|....wtit|
|00002f00| 6c 65 31 25 33 30 0d 11 | 26 12 24 62 6c 6f 63 6b |le1%30..|&.$block|
|00002f10| 25 3d 22 54 41 53 4b 22 | 0d 11 30 3b c8 99 22 57 |%="TASK"|..0;.."W|
|00002f20| 69 6d 70 5f 49 6e 69 74 | 69 61 6c 69 73 65 22 2c |imp_Init|ialise",|
|00002f30| 32 30 30 2c 21 62 6c 6f | 63 6b 25 2c 22 44 7a 61 |200,!blo|ck%,"Dza|
|00002f40| 70 22 b8 76 65 72 73 69 | 6f 6e 25 2c 6d 79 74 61 |p".versi|on%,myta|
|00002f50| 73 6b 25 0d 11 3a 31 21 | 62 6c 6f 63 6b 25 3d 2d |sk%..:1!|block%=-|
|00002f60| 31 3a 62 6c 6f 63 6b 25 | 21 34 3d 30 3a 62 6c 6f |1:block%|!4=0:blo|
|00002f70| 63 6b 25 21 38 3d 30 3a | 62 6c 6f 63 6b 25 21 31 |ck%!8=0:|block%!1|
|00002f80| 32 3d 36 39 0d 11 44 35 | 62 6c 6f 63 6b 25 21 31 |2=69..D5|block%!1|
|00002f90| 36 3d 36 38 3a 62 6c 6f | 63 6b 25 21 32 30 3d 26 |6=68:blo|ck%!20=&|
|00002fa0| 33 30 30 32 3a 24 28 62 | 6c 6f 63 6b 25 2b 32 34 |3002:$(b|lock%+24|
|00002fb0| 29 3d 22 21 44 7a 61 70 | 22 0d 11 4e 23 c8 99 22 |)="!Dzap|"..N#.."|
|00002fc0| 57 69 6d 70 5f 43 72 65 | 61 74 65 49 63 6f 6e 22 |Wimp_Cre|ateIcon"|
|00002fd0| 2c 2c 62 6c 6f 63 6b 25 | b8 69 63 25 0d 11 58 0d |,,block%|.ic%..X.|
|00002fe0| 64 69 61 6c 6f 67 25 3d | 30 0d 11 62 1e 6f 70 65 |dialog%=|0..b.ope|
|00002ff0| 6e 25 3d 30 3a 64 69 73 | 70 6c 61 79 25 3d 30 3a |n%=0:dis|play%=0:|
|00003000| 66 69 6e 64 25 3d 30 0d | 11 6c 26 66 69 6e 64 31 |find%=0.|.l&find1|
|00003010| 25 3d 30 3a 73 61 76 65 | 25 3d 30 3a 73 61 76 65 |%=0:save|%=0:save|
|00003020| 31 25 3d 30 3a 73 61 76 | 65 32 25 3d 30 0d 11 76 |1%=0:sav|e2%=0..v|
|00003030| 23 63 61 74 25 3d 30 3a | 63 61 74 31 25 3d 30 3a |#cat%=0:|cat1%=0:|
|00003040| 63 6f 6d 70 25 3d 30 3a | 63 6f 6d 70 31 25 3d 30 |comp%=0:|comp1%=0|
|00003050| 0d 11 80 0d 73 61 76 65 | 32 24 3d 22 22 0d 11 8a |....save|2$=""...|
|00003060| 0f f2 6d 65 6e 75 69 6e | 69 74 3a e1 0d 11 94 05 |..menuin|it:.....|
|00003070| 3a 0d 11 9e 2a dd f2 6d | 65 6e 75 69 6e 69 74 3a |:...*..m|enuinit:|
|00003080| c8 99 22 4f 53 5f 42 79 | 74 65 22 2c 31 36 31 2c |.."OS_By|te",161,|
|00003090| 31 33 35 b8 2c 2c 64 69 | 73 63 25 0d 11 a8 19 e7 |135.,,di|sc%.....|
|000030a0| 64 69 73 63 25 3e 31 63 | 24 3d 22 2e 22 8b 63 24 |disc%>1c|$=".".c$|
|000030b0| 3d 22 a4 22 0d 11 b2 52 | 69 6e 66 6f 25 3d a4 63 |="."...R|info%=.c|
|000030c0| 72 65 61 74 65 77 69 6e | 64 6f 77 28 22 41 62 6f |reatewin|dow("Abo|
|000030d0| 75 74 20 74 68 69 73 20 | 70 72 6f 67 72 61 6d 22 |ut this |program"|
|000030e0| 2c 26 38 33 2c 30 2c 31 | 2c 36 30 30 2c 32 31 36 |,&83,0,1|,600,216|
|000030f0| 2c 30 2c 30 2c 36 30 30 | 2c 32 31 36 2c 30 2c 30 |,0,0,600|,216,0,0|
|00003100| 2c 2d 31 2c 30 29 0d 11 | bc 29 f7 8d 54 60 52 3a |,-1,0)..|.)..T`R:|
|00003110| f3 73 61 76 65 73 65 63 | 24 2c 6e 69 63 6f 6e 73 |.savesec|$,nicons|
|00003120| 25 2c 78 73 69 7a 65 25 | 2c 79 73 69 7a 65 25 0d |%,xsize%|,ysize%.|
|00003130| 11 c6 6a 73 61 76 65 73 | 65 63 25 3d a4 63 72 65 |..jsaves|ec%=.cre|
|00003140| 61 74 65 77 69 6e 64 6f | 77 28 22 53 61 76 65 3a |atewindo|w("Save:|
|00003150| 22 2c 26 38 36 30 31 30 | 30 31 32 2c 30 2c 31 2c |",&86010|012,0,1,|
|00003160| 78 73 69 7a 65 25 2c 79 | 73 69 7a 65 25 2b 34 30 |xsize%,y|size%+40|
|00003170| 2c 30 2c 30 2c 78 73 69 | 7a 65 25 2c 79 73 69 7a |,0,0,xsi|ze%,ysiz|
|00003180| 65 25 2b 34 30 2c 6e 69 | 63 6f 6e 73 25 2c 26 33 |e%+40,ni|cons%,&3|
|00003190| 30 30 30 2c 2d 31 2c 31 | 29 0d 11 d0 26 69 6d 65 |000,-1,1|)...&ime|
|000031a0| 6e 75 24 3d 22 33 44 7a | 61 70 7c 3c 69 6e 66 6f |nu$="3Dz|ap|<info|
|000031b0| 25 3e 2e 49 6e 66 6f 7c | 2e 51 75 69 74 7c 22 0d |%>.Info||.Quit|".|
|000031c0| 11 da 2e 6a 25 3d a4 63 | 72 65 61 74 65 6d 65 6e |...j%=.c|reatemen|
|000031d0| 75 28 69 6e 69 74 62 6c | 6f 63 6b 25 2c 69 6d 65 |u(initbl|ock%,ime|
|000031e0| 6e 75 24 2c 69 74 62 6c | 6f 63 6b 25 29 0d 11 e4 |nu$,itbl|ock%)...|
|000031f0| 63 6d 61 69 6e 24 3d 22 | 35 44 7a 61 70 7c 2e 46 |cmain$="|5Dzap|.F|
|00003200| 69 6e 64 20 73 74 72 69 | 6e 67 7c 2e 53 61 76 65 |ind stri|ng|.Save|
|00003210| 20 73 65 63 74 6f 72 73 | 7c 2e 43 61 74 20 69 6e | sectors||.Cat in|
|00003220| 66 6f 7c 22 2b 63 24 2b | 22 3a 43 6f 6d 70 61 72 |fo|"+c$+|":Compar|
|00003230| 65 20 64 69 73 6b 73 7c | 3c 73 61 76 65 73 65 63 |e disks||<savesec|
|00003240| 25 3e a4 53 61 76 65 20 | 73 65 63 74 6f 72 7c 22 |%>.Save |sector|"|
|00003250| 0d 11 ee 2f 6a 25 3d a4 | 63 72 65 61 74 65 6d 65 |.../j%=.|createme|
|00003260| 6e 75 28 6d 61 69 6e 62 | 6c 6f 63 6b 25 2c 6d 61 |nu(mainb|lock%,ma|
|00003270| 69 6e 24 2c 74 65 78 74 | 62 6c 6f 63 6b 25 29 0d |in$,text|block%).|
|00003280| 11 f8 05 e1 0d 12 02 05 | 3a 0d 12 0c 2e 2a 2a 2a |........|:....***|
|00003290| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000032a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000032b0| 2a 2a 2a 2a 2a 2a 2a 0d | 12 16 05 3a 0d 12 20 15 |*******.|...:.. .|
|000032c0| dc 73 61 76 65 73 65 63 | 2c 32 2c 34 32 30 2c 38 |.savesec|,2,420,8|
|000032d0| 34 0d 12 2a 1e dc 32 30 | 2c 32 30 2c 31 38 30 2c |4..*..20|,20,180,|
|000032e0| 36 34 2c 30 2c 37 2c 26 | 33 30 33 44 2c 4f 4b 0d |64,0,7,&|303D,OK.|
|000032f0| 12 34 24 dc 32 32 30 2c | 32 30 2c 34 30 30 2c 36 |.4$.220,|20,400,6|
|00003300| 34 2c 31 32 2c 37 2c 26 | 33 30 33 44 2c 43 61 6e |4,12,7,&|303D,Can|
|00003310| 63 65 6c 0d 12 3e 05 3a | 0d 12 48 17 dc 73 61 76 |cel..>.:|..H..sav|
|00003320| 65 66 69 6c 65 2c 33 2c | 32 31 32 2c 31 34 30 0d |efile,3,|212,140.|
|00003330| 12 52 26 dc 32 30 2c 32 | 30 2c 31 34 38 2c 36 34 |.R&.20,2|0,148,64|
|00003340| 2c 30 2c 37 2c 26 46 31 | 33 44 2c 22 66 69 6c 65 |,0,7,&F1|3D,"file|
|00003350| 25 2c 33 30 22 0d 12 5c | 21 dc 31 35 32 2c 32 30 |%,30"..\|!.152,20|
|00003360| 2c 31 39 32 2c 36 34 2c | 31 32 2c 37 2c 26 31 39 |,192,64,|12,7,&19|
|00003370| 30 33 44 2c 4f 4b 0d 12 | 66 25 dc 37 30 2c 37 34 |03D,OK..|f%.70,74|
|00003380| 2c 31 33 38 2c 31 34 32 | 2c 30 2c 37 2c 26 36 30 |,138,142|,0,7,&60|
|00003390| 33 41 2c 66 69 6c 65 5f | 66 66 64 0d 12 70 05 3a |3A,file_|ffd..p.:|
|000033a0| 0d 12 7a 14 dc 6f 70 65 | 6e 2c 31 37 2c 38 30 32 |..z..ope|n,17,802|
|000033b0| 2c 31 34 38 0d 12 84 1e | dc 32 30 2c 32 30 2c 36 |,148....|.20,20,6|
|000033c0| 34 2c 36 34 2c 30 2c 37 | 2c 26 32 30 33 44 2c 22 |4,64,0,7|,&203D,"|
|000033d0| 8b 22 0d 12 8e 23 dc 37 | 34 2c 32 30 2c 31 32 38 |."...#.7|4,20,128|
|000033e0| 2c 36 34 2c 31 2c 37 2c | 26 33 31 33 44 2c 22 64 |,64,1,7,|&313D,"d|
|000033f0| 73 25 2c 33 22 0d 12 98 | 20 dc 31 33 38 2c 32 30 |s%,3"...| .138,20|
|00003400| 2c 31 38 32 2c 36 34 2c | 30 2c 37 2c 26 32 30 33 |,182,64,|0,7,&203|
|00003410| 44 2c 22 8a 22 0d 12 a2 | 20 dc 32 30 32 2c 32 30 |D,"."...| .202,20|
|00003420| 2c 32 34 36 2c 36 34 2c | 30 2c 37 2c 26 32 30 33 |,246,64,|0,7,&203|
|00003430| 44 2c 22 8b 22 0d 12 ac | 24 dc 32 35 36 2c 32 30 |D,"."...|$.256,20|
|00003440| 2c 33 31 30 2c 36 34 2c | 31 2c 37 2c 26 33 31 33 |,310,64,|1,7,&313|
|00003450| 44 2c 22 74 72 25 2c 33 | 22 0d 12 b6 20 dc 33 32 |D,"tr%,3|"... .32|
|00003460| 30 2c 32 30 2c 33 36 34 | 2c 36 34 2c 30 2c 37 2c |0,20,364|,64,0,7,|
|00003470| 26 32 30 33 44 2c 22 8a | 22 0d 12 c0 20 dc 33 38 |&203D,".|"... .38|
|00003480| 34 2c 32 30 2c 34 32 38 | 2c 36 34 2c 30 2c 37 2c |4,20,428|,64,0,7,|
|00003490| 26 32 30 33 44 2c 22 8b | 22 0d 12 ca 24 dc 34 33 |&203D,".|"...$.43|
|000034a0| 38 2c 32 30 2c 34 39 32 | 2c 36 34 2c 31 2c 37 2c |8,20,492|,64,1,7,|
|000034b0| 26 33 31 33 44 2c 22 68 | 64 25 2c 33 22 0d 12 d4 |&313D,"h|d%,3"...|
|000034c0| 20 dc 35 30 32 2c 32 30 | 2c 35 34 36 2c 36 34 2c | .502,20|,546,64,|
|000034d0| 30 2c 37 2c 26 32 30 33 | 44 2c 22 8a 22 0d 12 de |0,7,&203|D,"."...|
|000034e0| 20 dc 35 36 36 2c 32 30 | 2c 36 31 30 2c 36 34 2c | .566,20|,610,64,|
|000034f0| 30 2c 37 2c 26 32 30 33 | 44 2c 22 8b 22 0d 12 e8 |0,7,&203|D,"."...|
|00003500| 24 dc 36 32 30 2c 32 30 | 2c 36 36 34 2c 36 34 2c |$.620,20|,664,64,|
|00003510| 31 2c 37 2c 26 33 31 33 | 44 2c 22 73 63 25 2c 33 |1,7,&313|D,"sc%,3|
|00003520| 22 0d 12 f2 20 dc 36 37 | 34 2c 32 30 2c 37 31 38 |"... .67|4,20,718|
|00003530| 2c 36 34 2c 30 2c 37 2c | 26 32 30 33 44 2c 22 8a |,64,0,7,|&203D,".|
|00003540| 22 0d 12 fc 20 dc 32 30 | 2c 38 34 2c 31 38 32 2c |"... .20|,84,182,|
|00003550| 31 32 38 2c 31 2c 37 2c | 26 31 39 2c 44 72 69 76 |128,1,7,|&19,Driv|
|00003560| 65 0d 13 06 21 dc 32 30 | 32 2c 38 34 2c 33 36 34 |e...!.20|2,84,364|
|00003570| 2c 31 32 38 2c 31 2c 37 | 2c 26 31 39 2c 54 72 61 |,128,1,7|,&19,Tra|
|00003580| 63 6b 0d 13 10 20 dc 33 | 38 34 2c 38 34 2c 35 34 |ck... .3|84,84,54|
|00003590| 36 2c 31 32 38 2c 31 2c | 37 2c 26 31 39 2c 48 65 |6,128,1,|7,&19,He|
|000035a0| 61 64 0d 13 1a 22 dc 35 | 36 36 2c 38 34 2c 37 31 |ad...".5|66,84,71|
|000035b0| 38 2c 31 32 38 2c 31 2c | 37 2c 26 31 39 2c 53 65 |8,128,1,|7,&19,Se|
|000035c0| 63 74 6f 72 0d 13 24 21 | dc 37 33 38 2c 32 30 2c |ctor..$!|.738,20,|
|000035d0| 37 38 32 2c 31 32 38 2c | 31 32 2c 37 2c 26 33 30 |782,128,|12,7,&30|
|000035e0| 33 44 2c 4f 4b 0d 13 2e | 05 3a 0d 13 38 13 dc 66 |3D,OK...|.:..8..f|
|000035f0| 69 6e 64 2c 35 2c 34 32 | 30 2c 32 31 32 0d 13 42 |ind,5,42|0,212..B|
|00003600| 1f dc 32 30 2c 32 30 2c | 31 38 30 2c 36 34 2c 31 |..20,20,|180,64,1|
|00003610| 32 2c 37 2c 26 33 30 33 | 44 2c 4f 4b 0d 13 4c 23 |2,7,&303|D,OK..L#|
|00003620| dc 32 32 30 2c 32 30 2c | 34 30 30 2c 36 34 2c 30 |.220,20,|400,64,0|
|00003630| 2c 37 2c 26 33 30 33 44 | 2c 43 61 6e 63 65 6c 0d |,7,&303D|,Cancel.|
|00003640| 13 56 29 dc 32 30 2c 38 | 34 2c 33 32 34 2c 31 32 |.V).20,8|4,324,12|
|00003650| 38 2c 30 2c 37 2c 26 31 | 31 39 2c 22 66 69 6e 64 |8,0,7,&1|19,"find|
|00003660| 73 74 72 25 2c 32 30 22 | 0d 13 60 27 dc 32 30 2c |str%,20"|..`'.20,|
|00003670| 31 34 38 2c 31 39 36 2c | 31 39 32 2c 30 2c 37 2c |148,196,|192,0,7,|
|00003680| 26 31 39 2c 46 69 6e 64 | 20 73 74 72 69 6e 67 0d |&19,Find| string.|
|00003690| 13 6a 2a dc 32 30 36 2c | 31 34 38 2c 34 30 30 2c |.j*.206,|148,400,|
|000036a0| 31 39 32 2c 30 2c 37 2c | 26 46 31 33 44 2c 22 66 |192,0,7,|&F13D,"f|
|000036b0| 6f 75 6e 64 25 2c 31 30 | 22 0d 13 74 05 3a 0d 13 |ound%,10|"..t.:..|
|000036c0| 7e 14 dc 66 6f 75 6e 64 | 2c 34 2c 34 32 30 2c 31 |~..found|,4,420,1|
|000036d0| 32 38 0d 13 88 25 dc 32 | 30 2c 32 30 2c 31 38 30 |28...%.2|0,20,180|
|000036e0| 2c 36 34 2c 31 32 2c 37 | 2c 26 32 30 33 44 2c 43 |,64,12,7|,&203D,C|
|000036f0| 6f 6e 74 69 6e 75 65 0d | 13 92 23 dc 32 32 30 2c |ontinue.|..#.220,|
|00003700| 32 30 2c 34 30 30 2c 36 | 34 2c 30 2c 37 2c 26 33 |20,400,6|4,0,7,&3|
|00003710| 30 33 44 2c 43 61 6e 63 | 65 6c 0d 13 9c 23 dc 32 |03D,Canc|el...#.2|
|00003720| 30 2c 38 34 2c 31 34 32 | 2c 31 32 38 2c 30 2c 37 |0,84,142|,128,0,7|
|00003730| 2c 26 31 39 2c 61 74 20 | 62 79 74 65 3a 0d 13 a6 |,&19,at |byte:...|
|00003740| 2b dc 32 32 30 2c 38 34 | 2c 33 34 30 2c 31 32 38 |+.220,84|,340,128|
|00003750| 2c 30 2c 37 2c 26 33 31 | 33 44 2c 22 66 6f 75 6e |,0,7,&31|3D,"foun|
|00003760| 64 25 2b 32 30 2c 36 22 | 0d 13 b0 05 3a 0d 13 ba |d%+20,6"|....:...|
|00003770| 27 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 20 53 74 61 72 |'*******|*** Star|
|00003780| 74 20 70 72 6f 67 72 61 | 6d 20 2a 2a 2a 2a 2a 2a |t progra|m ******|
|00003790| 2a 2a 2a 2a 0d 13 c4 05 | 3a 0d 13 ce 10 dd f2 6f |****....|:......o|
|000037a0| 70 65 6e 3a f7 8d 44 7a | 52 0d 13 d8 21 f3 6f 70 |pen:..Dz|R...!.op|
|000037b0| 65 6e 24 2c 6e 69 63 6f | 6e 73 25 2c 77 69 64 74 |en$,nico|ns%,widt|
|000037c0| 68 25 2c 68 65 69 67 68 | 74 25 0d 13 e2 64 6f 70 |h%,heigh|t%...dop|
|000037d0| 65 6e 25 3d a4 63 72 65 | 61 74 65 77 69 6e 64 6f |en%=.cre|atewindo|
|000037e0| 77 28 22 44 69 73 6b 20 | 65 64 69 74 22 2c 26 42 |w("Disk |edit",&B|
|000037f0| 33 2c 37 2c 31 34 2c 77 | 69 64 74 68 25 2c 68 65 |3,7,14,w|idth%,he|
|00003800| 69 67 68 74 25 2c 32 30 | 30 2c 32 30 30 2c 32 30 |ight%,20|0,200,20|
|00003810| 30 2b 77 69 64 74 68 25 | 2c 32 30 30 2b 68 65 69 |0+width%|,200+hei|
|00003820| 67 68 74 25 2c 30 2c 30 | 2c 2d 31 2c 30 29 0d 13 |ght%,0,0|,-1,0)..|
|00003830| ec 11 f2 69 63 6f 6e 73 | 28 6f 70 65 6e 25 29 0d |...icons|(open%).|
|00003840| 13 f6 20 f2 6f 70 65 6e | 77 69 6e 64 6f 77 28 6f |.. .open|window(o|
|00003850| 70 65 6e 25 2c 62 6c 6f | 63 6b 25 2c 2d 31 29 0d |pen%,blo|ck%,-1).|
|00003860| 14 00 05 e1 0d 14 0a 05 | 3a 0d 14 14 1c dd a4 63 |........|:......c|
|00003870| 6c 69 63 6b 64 69 61 6c | 6f 67 6f 70 65 6e 28 69 |lickdial|ogopen(i|
|00003880| 63 6f 6e 25 29 0d 14 1e | 37 64 72 69 76 65 25 3d |con%)...|7drive%=|
|00003890| bb 24 64 73 25 3a 74 72 | 61 63 6b 25 3d bb 24 74 |.$ds%:tr|ack%=.$t|
|000038a0| 72 25 3a 68 65 61 64 25 | 3d bb 24 68 64 25 3a 73 |r%:head%|=.$hd%:s|
|000038b0| 65 63 74 6f 72 25 3d bb | 24 73 63 25 0d 14 28 16 |ector%=.|$sc%..(.|
|000038c0| f2 67 65 74 61 64 64 72 | 65 73 73 28 69 63 6f 6e |.getaddr|ess(icon|
|000038d0| 25 29 0d 14 32 0c c8 8e | 69 63 6f 6e 25 ca 0d 14 |%)..2...|icon%...|
|000038e0| 3c 33 c9 31 36 3a 74 64 | 25 3d 64 72 69 76 65 25 |<3.16:td|%=drive%|
|000038f0| 3a 74 74 25 3d 74 72 61 | 63 6b 25 3a 74 68 25 3d |:tt%=tra|ck%:th%=|
|00003900| 68 65 61 64 25 3a 74 73 | 25 3d 73 65 63 74 6f 72 |head%:ts|%=sector|
|00003910| 25 0d 14 46 10 e7 64 69 | 73 70 6c 61 79 25 3d 30 |%..F..di|splay%=0|
|00003920| 8c 0d 14 50 51 64 69 73 | 70 6c 61 79 25 3d a4 63 |...PQdis|play%=.c|
|00003930| 72 65 61 74 65 77 69 6e | 64 6f 77 28 22 53 65 63 |reatewin|dow("Sec|
|00003940| 74 6f 72 22 2c 26 46 2c | 37 2c 30 2c 31 32 34 30 |tor",&F,|7,0,1240|
|00003950| 2c 32 30 34 38 2c 30 2c | 31 38 32 2c 31 32 34 30 |,2048,0,|182,1240|
|00003960| 2c 38 33 35 2c 30 2c 26 | 33 30 30 30 2c 2d 32 2c |,835,0,&|3000,-2,|
|00003970| 30 29 0d 14 5a 36 f2 6f | 70 65 6e 77 69 6e 64 6f |0)..Z6.o|penwindo|
|00003980| 77 28 64 69 73 70 6c 61 | 79 25 2c 62 6c 6f 63 6b |w(displa|y%,block|
|00003990| 25 2c 6f 70 65 6e 25 29 | 3a 64 69 73 70 24 3d 22 |%,open%)|:disp$="|
|000039a0| 64 69 73 70 6c 61 79 22 | 0d 14 64 0c f2 64 69 73 |display"|..d..dis|
|000039b0| 70 6c 61 79 0d 14 6e 63 | 6d 61 69 6e 24 3d 22 35 |play..nc|main$="5|
|000039c0| 44 7a 61 70 7c 2e 46 69 | 6e 64 20 73 74 72 69 6e |Dzap|.Fi|nd strin|
|000039d0| 67 7c 2e 53 61 76 65 20 | 73 65 63 74 6f 72 73 7c |g|.Save |sectors||
|000039e0| 2e 43 61 74 20 69 6e 66 | 6f 7c 22 2b 63 24 2b 22 |.Cat inf|o|"+c$+"|
|000039f0| 3a 43 6f 6d 70 61 72 65 | 20 64 69 73 6b 73 7c 3c |:Compare| disks|<|
|00003a00| 73 61 76 65 73 65 63 25 | 3e 2e 53 61 76 65 20 73 |savesec%|>.Save s|
|00003a10| 65 63 74 6f 72 7c 22 0d | 14 78 2f 6a 25 3d a4 63 |ector|".|.x/j%=.c|
|00003a20| 72 65 61 74 65 6d 65 6e | 75 28 6d 61 69 6e 62 6c |reatemen|u(mainbl|
|00003a30| 6f 63 6b 25 2c 6d 61 69 | 6e 24 2c 74 65 78 74 62 |ock%,mai|n$,textb|
|00003a40| 6c 6f 63 6b 25 29 0d 14 | 82 05 cc 0d 14 8c 0c f2 |lock%)..|........|
|00003a50| 64 69 73 70 6c 61 79 0d | 14 96 3f e7 64 69 73 70 |display.|..?.disp|
|00003a60| 24 3d 22 22 64 69 73 70 | 24 3d 22 64 69 73 70 6c |$=""disp|$="displ|
|00003a70| 61 79 22 3a f2 6f 70 65 | 6e 77 69 6e 64 6f 77 28 |ay":.ope|nwindow(|
|00003a80| 64 69 73 70 6c 61 79 25 | 2c 62 6c 6f 63 6b 25 2c |display%|,block%,|
|00003a90| 6f 70 65 6e 25 29 0d 14 | a0 1b f2 72 65 64 72 61 |open%)..|...redra|
|00003aa0| 77 77 69 6e 64 6f 77 28 | 64 69 73 70 6c 61 79 25 |wwindow(|display%|
|00003ab0| 29 0d 14 aa 05 cd 0d 14 | b4 05 cb 0d 14 be 37 24 |).......|......7$|
|00003ac0| 64 73 25 3d c3 64 72 69 | 76 65 25 3a 24 74 72 25 |ds%=.dri|ve%:$tr%|
|00003ad0| 3d c3 74 72 61 63 6b 25 | 3a 24 68 64 25 3d c3 68 |=.track%|:$hd%=.h|
|00003ae0| 65 61 64 25 3a 24 73 63 | 25 3d c3 73 65 63 74 6f |ead%:$sc|%=.secto|
|00003af0| 72 25 0d 14 c8 18 f2 72 | 65 64 72 61 77 77 69 6e |r%.....r|edrawwin|
|00003b00| 64 6f 77 28 6f 70 65 6e | 25 29 0d 14 d2 06 3d a3 |dow(open|%)....=.|
|00003b10| 0d 14 dc 05 3a 0d 14 e6 | 17 dd f2 67 65 74 61 64 |....:...|...getad|
|00003b20| 64 72 65 73 73 28 69 63 | 6f 6e 25 29 0d 14 f0 0c |dress(ic|on%)....|
|00003b30| c8 8e 69 63 6f 6e 25 ca | 0d 14 fa 1e c9 30 3a 64 |..icon%.|.....0:d|
|00003b40| 72 69 76 65 25 3d 28 64 | 72 69 76 65 25 2b 31 29 |rive%=(d|rive%+1)|
|00003b50| 83 64 69 73 63 25 0d 15 | 04 26 c9 32 3a 64 72 69 |.disc%..|.&.2:dri|
|00003b60| 76 65 25 2d 3d 31 3a e7 | 64 72 69 76 65 25 3c 30 |ve%-=1:.|drive%<0|
|00003b70| 64 72 69 76 65 25 3d 64 | 69 73 63 25 0d 15 0e 1b |drive%=d|isc%....|
|00003b80| c9 33 3a 74 72 61 63 6b | 25 3d 28 74 72 61 63 6b |.3:track|%=(track|
|00003b90| 25 2b 31 29 83 38 30 0d | 15 18 23 c9 35 3a 74 72 |%+1).80.|..#.5:tr|
|00003ba0| 61 63 6b 25 2d 3d 31 3a | e7 74 72 61 63 6b 25 3c |ack%-=1:|.track%<|
|00003bb0| 30 74 72 61 63 6b 25 3d | 37 39 0d 15 22 35 c9 36 |0track%=|79.."5.6|
|00003bc0| 3a 68 65 61 64 25 3d 28 | 68 65 61 64 25 2b 31 29 |:head%=(|head%+1)|
|00003bd0| 83 32 3a e7 68 65 61 64 | 25 3d 30 74 72 61 63 6b |.2:.head|%=0track|
|00003be0| 25 3d 28 74 72 61 63 6b | 25 2b 31 29 83 38 30 0d |%=(track|%+1).80.|
|00003bf0| 15 2c 3c c9 38 3a 68 65 | 61 64 25 2d 3d 31 3a e7 |.,<.8:he|ad%-=1:.|
|00003c00| 68 65 61 64 25 3c 30 68 | 65 61 64 25 3d 31 3a 74 |head%<0h|ead%=1:t|
|00003c10| 72 61 63 6b 25 2d 3d 31 | 3a e7 74 72 61 63 6b 25 |rack%-=1|:.track%|
|00003c20| 3c 30 74 72 61 63 6b 25 | 3d 37 39 0d 15 36 55 c9 |<0track%|=79..6U.|
|00003c30| 39 3a 73 65 63 74 6f 72 | 25 3d 28 73 65 63 74 6f |9:sector|%=(secto|
|00003c40| 72 25 2b 31 29 83 35 3a | e7 73 65 63 74 6f 72 25 |r%+1).5:|.sector%|
|00003c50| 3d 30 68 65 61 64 25 3d | 28 68 65 61 64 25 2b 31 |=0head%=|(head%+1|
|00003c60| 29 83 32 3a e7 68 65 61 | 64 25 3d 30 74 72 61 63 |).2:.hea|d%=0trac|
|00003c70| 6b 25 3d 28 74 72 61 63 | 6b 25 2b 31 29 83 38 30 |k%=(trac|k%+1).80|
|00003c80| 0d 15 40 5d c9 31 31 3a | 73 65 63 74 6f 72 25 2d |..@].11:|sector%-|
|00003c90| 3d 31 3a e7 73 65 63 74 | 6f 72 25 3d 2d 31 73 65 |=1:.sect|or%=-1se|
|00003ca0| 63 74 6f 72 25 3d 34 3a | 68 65 61 64 25 3d 94 28 |ctor%=4:|head%=.(|
|00003cb0| 68 65 61 64 25 2d 31 29 | 3a e7 68 65 61 64 25 3d |head%-1)|:.head%=|
|00003cc0| 31 74 72 61 63 6b 25 2d | 3d 31 3a e7 74 72 61 63 |1track%-|=1:.trac|
|00003cd0| 6b 25 3c 30 74 72 61 63 | 6b 25 3d 37 39 0d 15 4a |k%<0trac|k%=79..J|
|00003ce0| 05 cb 0d 15 54 05 e1 0d | 15 5e 05 3a 0d 15 68 0d |....T...|.^.:..h.|
|00003cf0| dd f2 64 69 73 70 6c 61 | 79 0d 15 72 37 64 72 69 |..displa|y..r7dri|
|00003d00| 76 65 25 3d bb 24 64 73 | 25 3a 74 72 61 63 6b 25 |ve%=.$ds|%:track%|
|00003d10| 3d bb 24 74 72 25 3a 68 | 65 61 64 25 3d bb 24 68 |=.$tr%:h|ead%=.$h|
|00003d20| 64 25 3a 73 65 63 74 6f | 72 25 3d bb 24 73 63 25 |d%:secto|r%=.$sc%|
|00003d30| 0d 15 7c 2e f2 6c 6f 61 | 64 73 65 63 74 6f 72 28 |..|..loa|dsector(|
|00003d40| 74 72 61 63 6b 25 2c 68 | 65 61 64 25 2c 73 65 63 |track%,h|ead%,sec|
|00003d50| 74 6f 72 25 2c 31 2c 64 | 72 69 76 65 25 29 0d 15 |tor%,1,d|rive%)..|
|00003d60| 86 7b e3 49 25 3d 30 b8 | 36 33 3a 4c 25 3d 49 25 |.{.I%=0.|63:L%=I%|
|00003d70| 2a 31 36 2b 53 25 3a 6c | 24 28 49 25 29 3d a4 70 |*16+S%:l|$(I%)=.p|
|00003d80| 61 64 64 28 4c 25 2d 53 | 25 29 2b 22 20 20 22 3a |add(L%-S|%)+"  ":|
|00003d90| 74 24 3d 22 22 3a e3 4a | 25 3d 30 b8 31 35 3a 43 |t$="":.J|%=0.15:C|
|00003da0| 25 3d 4c 25 3f 4a 25 3a | 6c 24 28 49 25 29 2b 3d |%=L%?J%:|l$(I%)+=|
|00003db0| a4 70 61 64 28 43 25 29 | 2b 22 20 22 3a e7 43 25 |.pad(C%)|+" ":.C%|
|00003dc0| 3e 33 31 80 43 25 3c 31 | 32 37 74 24 2b 3d bd 43 |>31.C%<1|27t$+=.C|
|00003dd0| 25 8b 74 24 2b 3d 22 2e | 22 0d 15 90 18 ed 3a 6c |%.t$+=".|".....:l|
|00003de0| 24 28 49 25 29 2b 3d 22 | 20 20 20 22 2b 74 24 3a |$(I%)+="|   "+t$:|
|00003df0| ed 0d 15 9a 05 e1 0d 15 | a4 05 3a 0d 15 ae 1b dd |........|..:.....|
|00003e00| a4 70 61 64 28 43 25 29 | 3a 3d c2 22 30 22 2b c3 |.pad(C%)|:=."0"+.|
|00003e10| 7e 43 25 2c 32 29 0d 15 | b8 05 3a 0d 15 c2 1e dd |~C%,2)..|..:.....|
|00003e20| a4 70 61 64 64 28 43 25 | 29 3a 3d c2 22 30 30 30 |.padd(C%|):=."000|
|00003e30| 22 2b c3 7e 43 25 2c 34 | 29 0d 15 cc 05 3a 0d 15 |"+.~C%,4|)....:..|
|00003e40| d6 28 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 20 43 61 74 |.(******|**** Cat|
|00003e50| 61 6c 6f 67 75 65 20 69 | 6e 66 6f 20 2a 2a 2a 2a |alogue i|nfo ****|
|00003e60| 2a 2a 2a 2a 2a 2a 0d 15 | e0 05 3a 0d 15 ea 1b dd |******..|..:.....|
|00003e70| f2 63 61 74 61 6c 6f 67 | 75 65 3a 40 25 3d 26 31 |.catalog|ue:@%=&1|
|00003e80| 30 30 30 39 30 41 0d 15 | f4 27 f2 73 74 6f 72 65 |00090A..|.'.store|
|00003e90| 3a 73 74 61 6d 70 25 3d | 26 46 46 46 30 30 30 30 |:stamp%=|&FFF0000|
|00003ea0| 30 3a 73 70 24 3d c4 34 | 2c 22 20 22 29 0d 15 fe |0:sp$=.4|," ")...|
|00003eb0| 51 63 61 74 25 3d a4 63 | 72 65 61 74 65 77 69 6e |Qcat%=.c|reatewin|
|00003ec0| 64 6f 77 28 22 43 61 74 | 61 6c 6f 67 75 65 20 69 |dow("Cat|alogue i|
|00003ed0| 6e 66 6f 22 2c 26 46 2c | 37 2c 30 2c 31 32 34 30 |nfo",&F,|7,0,1240|
|00003ee0| 2c 32 30 34 38 2c 30 2c | 31 38 32 2c 31 32 34 30 |,2048,0,|182,1240|
|00003ef0| 2c 38 33 35 2c 30 2c 30 | 2c 2d 31 2c 30 29 0d 16 |,835,0,0|,-1,0)..|
|00003f00| 08 13 f7 8d 74 48 53 3a | 6e 69 63 6f 6e 73 25 3d |....tHS:|nicons%=|
|00003f10| 32 0d 16 12 52 63 61 74 | 31 25 3d a4 63 72 65 61 |2...Rcat|1%=.crea|
|00003f20| 74 65 77 69 6e 64 6f 77 | 28 22 43 61 74 61 6c 6f |tewindow|("Catalo|
|00003f30| 67 75 65 22 2c 26 39 33 | 2c 26 39 30 2c 31 2c 34 |gue",&93|,&90,1,4|
|00003f40| 32 30 2c 38 34 2c 31 30 | 30 2c 32 30 30 2c 35 32 |20,84,10|0,200,52|
|00003f50| 30 2c 32 38 34 2c 30 2c | 26 33 30 30 30 2c 2d 31 |0,284,0,|&3000,-1|
|00003f60| 2c 30 29 0d 16 1c 11 f2 | 69 63 6f 6e 73 28 63 61 |,0).....|icons(ca|
|00003f70| 74 31 25 29 0d 16 26 23 | 66 6f 75 6e 64 63 61 74 |t1%)..&#|foundcat|
|00003f80| 25 3d a3 3a 63 61 74 24 | 3d 22 22 3a 63 61 74 31 |%=.:cat$|="":cat1|
|00003f90| 24 3d 22 63 61 74 22 0d | 16 30 0f e7 a4 66 69 6e |$="cat".|.0...fin|
|00003fa0| 64 63 61 74 20 8c 0d 16 | 3a 1f f2 6f 70 65 6e 77 |dcat ...|:..openw|
|00003fb0| 69 6e 64 6f 77 28 63 61 | 74 25 2c 62 6c 6f 63 6b |indow(ca|t%,block|
|00003fc0| 25 2c 2d 31 29 0d 16 44 | 20 f2 6f 70 65 6e 77 69 |%,-1)..D| .openwi|
|00003fd0| 6e 64 6f 77 28 63 61 74 | 31 25 2c 62 6c 6f 63 6b |ndow(cat|1%,block|
|00003fe0| 25 2c 2d 31 29 0d 16 4e | 05 cd 0d 16 58 05 e1 0d |%,-1)..N|....X...|
|00003ff0| 16 62 05 3a 0d 16 6c 1b | dd a4 63 6c 69 63 6b 64 |.b.:..l.|..clickd|
|00004000| 69 61 6c 6f 67 63 61 74 | 28 69 63 6f 6e 25 29 0d |ialogcat|(icon%).|
|00004010| 16 76 1a 65 6e 64 64 69 | 61 6c 6f 67 25 3d a3 3a |.v.enddi|alog%=.:|
|00004020| e7 67 25 3d 32 37 3a 3d | 30 0d 16 80 0c c8 8e 69 |.g%=27:=|0......i|
|00004030| 63 6f 6e 25 ca 0d 16 8a | 06 c9 30 0d 16 94 0f e7 |con%....|..0.....|
|00004040| a4 66 69 6e 64 63 61 74 | 20 8c 0d 16 9e 0f 66 6f |.findcat| .....fo|
|00004050| 75 6e 64 63 61 74 25 3d | a3 0d 16 a8 17 f2 72 65 |undcat%=|......re|
|00004060| 64 72 61 77 77 69 6e 64 | 6f 77 28 63 61 74 25 29 |drawwind|ow(cat%)|
|00004070| 0d 16 b2 05 cc 0d 16 bc | 10 65 6e 64 64 69 61 6c |........|.enddial|
|00004080| 6f 67 25 3d b9 0d 16 c6 | 16 f2 63 6c 6f 73 65 77 |og%=....|..closew|
|00004090| 69 6e 64 6f 77 28 63 61 | 74 25 29 0d 16 d0 05 cd |indow(ca|t%).....|
|000040a0| 0d 16 da 13 c9 31 3a 65 | 6e 64 64 69 61 6c 6f 67 |.....1:e|nddialog|
|000040b0| 25 3d b9 0d 16 e4 16 f2 | 63 6c 6f 73 65 77 69 6e |%=......|closewin|
|000040c0| 64 6f 77 28 63 61 74 25 | 29 0d 16 ee 05 cb 0d 16 |dow(cat%|).......|
|000040d0| f8 0f 3d 65 6e 64 64 69 | 61 6c 6f 67 25 0d 17 02 |..=enddi|alog%...|
|000040e0| 05 3a 0d 17 0c 24 dd a4 | 66 69 6e 64 63 61 74 3a |.:...$..|findcat:|
|000040f0| f5 3a f2 72 65 64 72 61 | 77 77 69 6e 64 6f 77 28 |.:.redra|wwindow(|
|00004100| 6f 70 65 6e 25 29 0d 17 | 16 15 67 25 3d a6 30 3a |open%)..|..g%=.0:|
|00004110| e7 67 25 3d 32 37 ef 37 | 3a 3d 30 0d 17 20 2e f2 |.g%=27.7|:=0.. ..|
|00004120| 6c 6f 61 64 73 65 63 74 | 6f 72 28 74 72 61 63 6b |loadsect|or(track|
|00004130| 25 2c 68 65 61 64 25 2c | 73 65 63 74 6f 72 25 2c |%,head%,|sector%,|
|00004140| 31 2c 64 72 69 76 65 25 | 29 0d 17 2a 3b e7 53 25 |1,drive%|)..*;.S%|
|00004150| 21 31 3d 26 36 42 36 33 | 36 39 34 45 20 84 53 25 |!1=&6B63|694E .S%|
|00004160| 21 31 3d 26 36 46 36 37 | 37 35 34 38 20 66 6f 75 |!1=&6F67|7548 fou|
|00004170| 6e 64 63 61 74 25 3d b9 | 3a f2 67 65 74 63 61 74 |ndcat%=.|:.getcat|
|00004180| 69 6e 66 6f 0d 17 34 47 | 73 65 63 74 6f 72 25 3d |info..4G|sector%=|
|00004190| 28 73 65 63 74 6f 72 25 | 2b 31 29 83 35 3a e7 73 |(sector%|+1).5:.s|
|000041a0| 65 63 74 6f 72 25 3d 30 | 68 65 61 64 25 3d 28 68 |ector%=0|head%=(h|
|000041b0| 65 61 64 25 2b 31 29 83 | 32 3a e7 68 65 61 64 25 |ead%+1).|2:.head%|
|000041c0| 3d 30 74 72 61 63 6b 25 | 2b 3d 31 0d 17 3e 2a 24 |=0track%|+=1..>*$|
|000041d0| 74 72 25 3d c3 74 72 61 | 63 6b 25 3a 24 68 64 25 |tr%=.tra|ck%:$hd%|
|000041e0| 3d c3 68 65 61 64 25 3a | 24 73 63 25 3d c3 73 65 |=.head%:|$sc%=.se|
|000041f0| 63 74 6f 72 25 0d 17 48 | 2c fd 28 74 72 61 63 6b |ctor%..H|,.(track|
|00004200| 25 3d 37 39 80 68 65 61 | 64 25 3d 31 80 73 65 63 |%=79.hea|d%=1.sec|
|00004210| 74 6f 72 25 3d 34 29 84 | 66 6f 75 6e 64 63 61 74 |tor%=4).|foundcat|
|00004220| 25 0d 17 52 0e 3d 66 6f | 75 6e 64 63 61 74 25 0d |%..R.=fo|undcat%.|
|00004230| 17 5c 05 3a 0d 17 66 13 | dd f2 67 65 74 63 61 74 |.\.:..f.|..getcat|
|00004240| 69 6e 66 6f 3a ef 37 0d | 17 70 1b 6f 66 66 73 65 |info:.7.|.p.offse|
|00004250| 74 25 3d 35 3a 6e 25 3d | 30 3a 6e 24 28 29 3d 22 |t%=5:n%=|0:n$()="|
|00004260| 20 22 0d 17 7a 24 f5 3a | 6e 24 28 6e 25 29 2b 3d | "..z$.:|n$(n%)+=|
|00004270| a4 67 65 74 73 74 72 69 | 6e 67 28 53 25 2b 6f 66 |.getstri|ng(S%+of|
|00004280| 66 73 65 74 25 29 0d 17 | 84 31 6c 6f 61 64 25 3d |fset%)..|.1load%=|
|00004290| 21 28 53 25 2b 6f 66 66 | 73 65 74 25 2b 31 30 29 |!(S%+off|set%+10)|
|000042a0| 3a 65 78 65 63 25 3d 21 | 28 53 25 2b 6f 66 66 73 |:exec%=!|(S%+offs|
|000042b0| 65 74 25 2b 31 34 29 0d | 17 8e 30 6c 65 6e 25 3d |et%+14).|..0len%=|
|000042c0| 21 28 53 25 2b 6f 66 66 | 73 65 74 25 2b 31 38 29 |!(S%+off|set%+18)|
|000042d0| 3a 61 74 74 72 25 3d 21 | 28 53 25 2b 6f 66 66 73 |:attr%=!|(S%+offs|
|000042e0| 65 74 25 2b 32 32 29 0d | 17 98 1b e7 28 6c 6f 61 |et%+22).|....(loa|
|000042f0| 64 25 80 73 74 61 6d 70 | 25 29 3d 73 74 61 6d 70 |d%.stamp|%)=stamp|
|00004300| 25 8c 0d 17 a2 1d 74 79 | 70 65 25 3d 28 6c 6f 61 |%.....ty|pe%=(loa|
|00004310| 64 25 80 26 46 46 46 30 | 30 29 81 26 31 30 30 0d |d%.&FFF0|0).&100.|
|00004320| 17 ac 0c c8 8e 74 79 70 | 65 25 ca 0d 17 b6 19 c9 |.....typ|e%......|
|00004330| 26 46 46 46 3a 74 24 3d | 22 41 53 43 49 49 20 74 |&FFF:t$=|"ASCII t|
|00004340| 65 78 74 22 0d 17 c0 1b | c9 26 46 46 45 3a 74 24 |ext"....|.&FFE:t$|
|00004350| 3d 22 43 6f 6d 6d 61 6e | 64 20 66 69 6c 65 22 0d |="Comman|d file".|
|00004360| 17 ca 2c c9 26 46 46 44 | 3a e7 6c 65 6e 25 3d 26 |..,.&FFD|:.len%=&|
|00004370| 38 30 30 74 24 3d 22 44 | 69 72 65 63 74 6f 72 79 |800t$="D|irectory|
|00004380| 22 8b 74 24 3d 22 44 61 | 74 61 22 0d 17 d4 22 c9 |".t$="Da|ta"...".|
|00004390| 26 46 46 43 3a 74 24 3d | 22 52 65 6c 6f 63 61 74 |&FFC:t$=|"Relocat|
|000043a0| 61 62 6c 65 20 75 74 69 | 6c 69 74 79 22 0d 17 de |able uti|lity"...|
|000043b0| 1c c9 26 46 46 42 3a 74 | 24 3d 22 42 41 53 49 43 |..&FFB:t|$="BASIC|
|000043c0| 20 70 72 6f 67 72 61 6d | 22 0d 17 e8 21 c9 26 46 | program|"...!.&F|
|000043d0| 46 41 3a 74 24 3d 22 52 | 65 6c 6f 63 61 74 61 62 |FA:t$="R|elocatab|
|000043e0| 6c 65 20 6d 6f 64 75 6c | 65 22 0d 17 f2 15 c9 26 |le modul|e".....&|
|000043f0| 46 46 39 3a 74 24 3d 22 | 53 70 72 69 74 65 22 0d |FF9:t$="|Sprite".|
|00004400| 17 fc 1c c9 26 46 46 38 | 3a 74 24 3d 22 41 62 73 |....&FF8|:t$="Abs|
|00004410| 6f 6c 75 74 65 20 63 6f | 64 65 22 0d 18 06 17 c9 |olute co|de".....|
|00004420| 26 46 46 37 3a 74 24 3d | 22 42 42 43 20 66 6f 6e |&FF7:t$=|"BBC fon|
|00004430| 74 22 0d 18 10 19 c9 26 | 46 46 36 3a 74 24 3d 22 |t".....&|FF6:t$="|
|00004440| 46 61 6e 63 79 20 66 6f | 6e 74 22 0d 18 1a 1e c9 |Fancy fo|nt".....|
|00004450| 26 46 46 35 3a 74 24 3d | 22 50 6f 73 74 53 63 72 |&FF5:t$=|"PostScr|
|00004460| 69 70 74 20 66 69 6c 65 | 22 0d 18 24 16 c9 26 46 |ipt file|"..$..&F|
|00004470| 45 44 3a 74 24 3d 22 50 | 61 6c 65 74 74 65 22 0d |ED:t$="P|alette".|
|00004480| 18 2e 1c c9 26 46 45 43 | 3a 74 24 3d 22 54 65 6d |....&FEC|:t$="Tem|
|00004490| 70 6c 61 74 65 20 66 69 | 6c 65 22 0d 18 38 18 c9 |plate fi|le"..8..|
|000044a0| 26 46 45 42 3a 74 24 3d | 22 4f 62 65 79 20 66 69 |&FEB:t$=|"Obey fi|
|000044b0| 6c 65 22 0d 18 42 18 c9 | 26 41 46 46 3a 74 24 3d |le"..B..|&AFF:t$=|
|000044c0| 22 44 72 61 77 20 66 69 | 6c 65 22 0d 18 4c 17 c9 |"Draw fi|le"..L..|
|000044d0| 26 41 46 38 22 74 24 3d | 22 46 57 2b 20 66 69 6c |&AF8"t$=|"FW+ fil|
|000044e0| 65 22 0d 18 56 1c c9 26 | 41 46 31 22 74 24 3d 22 |e"..V..&|AF1"t$="|
|000044f0| 21 4d 61 65 73 74 72 6f | 20 66 69 6c 65 22 0d 18 |!Maestro| file"..|
|00004500| 60 1e c9 26 38 30 38 3a | 74 24 3d 22 50 6f 73 74 |`..&808:|t$="Post|
|00004510| 53 63 72 69 70 74 20 66 | 69 6c 65 22 0d 18 6a 1c |Script f|ile"..j.|
|00004520| 7f 3a 74 24 3d 22 55 6e | 6b 6e 6f 77 6e 20 66 69 |.:t$="Un|known fi|
|00004530| 6c 65 20 74 79 70 65 22 | 0d 18 74 05 cb 0d 18 7e |le type"|..t....~|
|00004540| 5e 6e 24 28 6e 25 29 2b | 3d a4 6e 75 6d 70 61 64 |^n$(n%)+|=.numpad|
|00004550| 28 c3 7e 74 79 70 65 25 | 2b 22 20 22 2b 74 24 2b |(.~type%|+" "+t$+|
|00004560| 73 70 24 2c 32 32 29 2b | 22 4c 65 6e 67 74 68 3a |sp$,22)+|"Length:|
|00004570| 20 22 2b a4 6e 75 6d 70 | 61 64 28 c3 7e 6c 65 6e | "+.nump|ad(.~len|
|00004580| 25 2c 31 30 29 2b 22 41 | 74 74 72 69 62 75 74 65 |%,10)+"A|ttribute|
|00004590| 3a 20 22 2b c3 7e 61 74 | 74 72 25 0d 18 88 05 cc |: "+.~at|tr%.....|
|000045a0| 0d 18 92 79 6e 24 28 6e | 25 29 2b 3d a4 6e 75 6d |...yn$(n|%)+=.num|
|000045b0| 70 61 64 28 22 45 78 65 | 63 3a 20 22 2b c3 7e 65 |pad("Exe|c: "+.~e|
|000045c0| 78 65 63 25 2c 31 34 29 | 2b a4 6e 75 6d 70 61 64 |xec%,14)|+.numpad|
|000045d0| 28 22 4c 6f 61 64 3a 20 | 22 2b c3 7e 6c 6f 61 64 |("Load: |"+.~load|
|000045e0| 25 2c 31 34 29 2b a4 6e | 75 6d 70 61 64 28 22 4c |%,14)+.n|umpad("L|
|000045f0| 65 6e 67 74 68 3a 20 22 | 2b c3 7e 6c 65 6e 25 2c |ength: "|+.~len%,|
|00004600| 31 36 29 2b 22 41 74 74 | 72 69 62 75 74 65 3a 20 |16)+"Att|ribute: |
|00004610| 22 2b c3 7e 61 74 74 72 | 25 0d 18 9c 05 cd 0d 18 |"+.~attr|%.......|
|00004620| a6 20 61 63 63 65 73 73 | 25 3d 61 74 74 72 25 81 |. access|%=attr%.|
|00004630| 26 31 30 30 30 30 30 30 | 3a 61 24 3d 22 22 0d 18 |&1000000|:a$=""..|
|00004640| b0 19 e7 28 61 63 63 65 | 73 73 25 80 31 29 3d 31 |...(acce|ss%.1)=1|
|00004650| 61 24 2b 3d 22 57 22 0d | 18 ba 19 e7 28 61 63 63 |a$+="W".|....(acc|
|00004660| 65 73 73 25 80 32 29 3d | 32 61 24 2b 3d 22 52 22 |ess%.2)=|2a$+="R"|
|00004670| 0d 18 c4 19 e7 28 61 63 | 63 65 73 73 25 80 34 29 |.....(ac|cess%.4)|
|00004680| 3d 34 61 24 2b 3d 22 4c | 22 0d 18 ce 14 6e 24 28 |=4a$+="L|"....n$(|
|00004690| 6e 25 29 2b 3d 61 24 3a | 6e 25 2b 3d 31 0d 18 d8 |n%)+=a$:|n%+=1...|
|000046a0| 0f 6f 66 66 73 65 74 25 | 2b 3d 32 36 0d 18 e2 11 |.offset%|+=26....|
|000046b0| fd 53 25 3f 6f 66 66 73 | 65 74 25 3d 30 0d 18 ec |.S%?offs|et%=0...|
|000046c0| 26 f2 72 65 73 69 7a 65 | 77 69 6e 64 6f 77 28 63 |&.resize|window(c|
|000046d0| 61 74 25 2c 30 2c 30 2c | 31 32 34 30 2c 6e 25 2a |at%,0,0,|1240,n%*|
|000046e0| 33 32 29 0d 18 f6 05 e1 | 0d 19 00 05 3a 0d 19 0a |32).....|....:...|
|000046f0| 1f dd a4 67 65 74 73 74 | 72 69 6e 67 28 61 64 25 |...getst|ring(ad%|
|00004700| 29 3a 66 24 3d 22 22 3a | 69 25 3d 30 0d 19 14 2a |):f$="":|i%=0...*|
|00004710| f5 3a 63 25 3d 61 64 25 | 3f 69 25 3a 66 24 2b 3d |.:c%=ad%|?i%:f$+=|
|00004720| bd 63 25 3a 69 25 2b 3d | 31 3a fd 63 25 3d 31 33 |.c%:i%+=|1:.c%=13|
|00004730| 84 69 25 3d 31 31 0d 19 | 1e 11 66 24 3d c0 66 24 |.i%=11..|..f$=.f$|
|00004740| 2c a9 66 24 2d 31 29 0d | 19 28 15 3d c0 66 24 2b |,.f$-1).|.(.=.f$+|
|00004750| c4 31 32 2c 22 20 22 29 | 2c 31 32 29 0d 19 32 05 |.12," ")|,12)..2.|
|00004760| 3a 0d 19 3c 15 dd a4 6e | 75 6d 70 61 64 28 61 24 |:..<...n|umpad(a$|
|00004770| 2c 6c 65 6e 25 29 0d 19 | 46 19 3d c0 61 24 2b c4 |,len%)..|F.=.a$+.|
|00004780| 6c 65 6e 25 2c 22 20 22 | 29 2c 6c 65 6e 25 29 0d |len%," "|),len%).|
|00004790| 19 50 05 3a 0d 19 5a 27 | 2a 2a 2a 2a 2a 2a 2a 2a |.P.:..Z'|********|
|000047a0| 2a 2a 20 46 69 6e 64 20 | 61 20 73 74 72 69 6e 67 |** Find |a string|
|000047b0| 20 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0d 19 64 05 3a | *******|***..d.:|
|000047c0| 0d 19 6e 10 dd f2 66 69 | 6e 64 3a f7 8d 54 78 53 |..n...fi|nd:..TxS|
|000047d0| 0d 19 78 10 66 69 6e 64 | 24 3d 22 66 69 6e 64 22 |..x.find|$="find"|
|000047e0| 0d 19 82 23 24 66 69 6e | 64 73 74 72 25 3d 22 28 |...#$fin|dstr%="(|
|000047f0| 34 20 63 68 61 72 61 63 | 74 65 72 73 20 6f 6e 6c |4 charac|ters onl|
|00004800| 79 29 22 0d 19 8c 34 66 | 69 6e 64 25 3d a4 63 72 |y)"...4f|ind%=.cr|
|00004810| 65 61 74 65 64 69 61 6c | 6f 67 28 31 2c 30 2c 26 |eatedial|og(1,0,&|
|00004820| 39 33 2c 22 46 69 6e 64 | 20 73 74 72 69 6e 67 22 |93,"Find| string"|
|00004830| 2c 66 69 6e 64 24 29 0d | 19 96 05 e1 0d 19 a0 05 |,find$).|........|
|00004840| 3a 0d 19 aa 1c dd a4 63 | 6c 69 63 6b 64 69 61 6c |:......c|lickdial|
|00004850| 6f 67 66 69 6e 64 28 69 | 63 6f 6e 25 29 0d 19 b4 |ogfind(i|con%)...|
|00004860| 10 65 6e 64 64 69 61 6c | 6f 67 25 3d a3 0d 19 be |.enddial|og%=....|
|00004870| 0c c8 8e 69 63 6f 6e 25 | ca 0d 19 c8 13 c9 30 3a |...icon%|......0:|
|00004880| 65 6e 64 64 69 61 6c 6f | 67 25 3d b9 0d 19 d2 15 |enddialo|g%=.....|
|00004890| e7 c0 24 66 6f 75 6e 64 | 25 2c 31 29 3d 22 26 22 |..$found|%,1)="&"|
|000048a0| 8c 0d 19 dc 09 66 24 3d | 22 22 0d 19 e6 2a e3 69 |.....f$=|""...*.i|
|000048b0| 25 3d 32 b8 38 3a 66 24 | 2b 3d bd 28 a0 28 22 26 |%=2.8:f$|+=.(.("&|
|000048c0| 22 2b c1 24 66 6f 75 6e | 64 25 2c 69 25 2c 32 29 |"+.$foun|d%,i%,2)|
|000048d0| 29 29 3a ed 0d 19 f0 0a | 24 46 25 3d 66 24 0d 19 |)):.....|$F%=f$..|
|000048e0| fa 05 cc 0d 1a 04 13 24 | 46 25 3d c0 24 66 6f 75 |.......$|F%=.$fou|
|000048f0| 6e 64 25 2c 34 29 0d 1a | 0e 05 cd 0d 1a 18 0a 66 |nd%,4)..|.......f|
|00004900| 25 3d 21 46 25 0d 1a 22 | 17 f2 63 6c 6f 73 65 77 |%=!F%.."|..closew|
|00004910| 69 6e 64 6f 77 28 66 69 | 6e 64 25 29 0d 1a 2c 18 |indow(fi|nd%)..,.|
|00004920| 66 6f 75 6e 64 24 3d 22 | 66 6f 75 6e 64 22 3a f7 |found$="|found":.|
|00004930| 8d 44 7e 53 0d 1a 36 0a | f2 73 74 6f 72 65 0d 1a |.D~S..6.|.store..|
|00004940| 40 0e e7 a4 73 65 61 72 | 63 68 20 8c 0d 1a 4a 30 |@...sear|ch ...J0|
|00004950| 66 69 6e 64 31 25 3d a4 | 63 72 65 61 74 65 64 69 |find1%=.|createdi|
|00004960| 61 6c 6f 67 28 32 2c 30 | 2c 26 39 33 2c 22 46 6f |alog(2,0|,&93,"Fo|
|00004970| 75 6e 64 22 2c 66 6f 75 | 6e 64 24 29 0d 1a 54 2a |und",fou|nd$)..T*|
|00004980| 24 74 72 25 3d c3 74 72 | 61 63 6b 25 3a 24 68 64 |$tr%=.tr|ack%:$hd|
|00004990| 25 3d c3 68 65 61 64 25 | 3a 24 73 63 25 3d c3 73 |%=.head%|:$sc%=.s|
|000049a0| 65 63 74 6f 72 25 0d 1a | 5e 05 cc 0d 1a 68 0c f2 |ector%..|^....h..|
|000049b0| 72 65 73 74 6f 72 65 0d | 1a 72 05 cd 0d 1a 7c 0c |restore.|.r....|.|
|000049c0| f2 64 69 73 70 6c 61 79 | 0d 1a 86 1b f2 72 65 64 |.display|.....red|
|000049d0| 72 61 77 77 69 6e 64 6f | 77 28 64 69 73 70 6c 61 |rawwindo|w(displa|
|000049e0| 79 25 29 0d 1a 90 18 f2 | 72 65 64 72 61 77 77 69 |y%).....|redrawwi|
|000049f0| 6e 64 6f 77 28 6f 70 65 | 6e 25 29 0d 1a 9a 13 c9 |ndow(ope|n%).....|
|00004a00| 31 3a 65 6e 64 64 69 61 | 6c 6f 67 25 3d b9 0d 1a |1:enddia|log%=...|
|00004a10| a4 05 cb 0d 1a ae 0f 3d | 65 6e 64 64 69 61 6c 6f |.......=|enddialo|
|00004a20| 67 25 0d 1a b8 05 3a 0d | 1a c2 1d dd a4 63 6c 69 |g%....:.|.....cli|
|00004a30| 63 6b 64 69 61 6c 6f 67 | 66 6f 75 6e 64 28 69 63 |ckdialog|found(ic|
|00004a40| 6f 6e 25 29 0d 1a cc 0f | d4 31 2c 2d 39 2c 32 30 |on%)....|.1,-9,20|
|00004a50| 30 2c 31 0d 1a d6 1a 65 | 6e 64 64 69 61 6c 6f 67 |0,1....e|nddialog|
|00004a60| 25 3d a3 3a e7 67 25 3d | 32 37 3a 3d b9 0d 1a e0 |%=.:.g%=|27:=....|
|00004a70| 0c c8 8e 69 63 6f 6e 25 | ca 0d 1a ea 06 c9 30 0d |...icon%|......0.|
|00004a80| 1a f4 47 73 65 63 74 6f | 72 25 3d 28 73 65 63 74 |..Gsecto|r%=(sect|
|00004a90| 6f 72 25 2b 31 29 83 35 | 3a e7 73 65 63 74 6f 72 |or%+1).5|:.sector|
|00004aa0| 25 3d 30 68 65 61 64 25 | 3d 28 68 65 61 64 25 2b |%=0head%|=(head%+|
|00004ab0| 31 29 83 32 3a e7 68 65 | 61 64 25 3d 30 74 72 61 |1).2:.he|ad%=0tra|
|00004ac0| 63 6b 25 2b 3d 31 0d 1a | fe 0e e7 a4 73 65 61 72 |ck%+=1..|....sear|
|00004ad0| 63 68 20 8c 0d 1b 08 2a | 24 74 72 25 3d c3 74 72 |ch ....*|$tr%=.tr|
|00004ae0| 61 63 6b 25 3a 24 68 64 | 25 3d c3 68 65 61 64 25 |ack%:$hd|%=.head%|
|00004af0| 3a 24 73 63 25 3d c3 73 | 65 63 74 6f 72 25 0d 1b |:$sc%=.s|ector%..|
|00004b00| 12 19 f2 72 65 64 72 61 | 77 77 69 6e 64 6f 77 28 |...redra|wwindow(|
|00004b10| 66 69 6e 64 31 25 29 0d | 1b 1c 05 cc 0d 1b 26 19 |find1%).|......&.|
|00004b20| f2 72 65 73 74 6f 72 65 | 3a 65 6e 64 64 69 61 6c |.restore|:enddial|
|00004b30| 6f 67 25 3d b9 0d 1b 30 | 05 cd 0d 1b 3a 1c c9 31 |og%=...0|....:..1|
|00004b40| 3a f2 72 65 73 74 6f 72 | 65 3a 65 6e 64 64 69 61 |:.restor|e:enddia|
|00004b50| 6c 6f 67 25 3d b9 0d 1b | 44 05 cb 0d 1b 4e 0c f2 |log%=...|D....N..|
|00004b60| 64 69 73 70 6c 61 79 0d | 1b 58 1b f2 72 65 64 72 |display.|.X..redr|
|00004b70| 61 77 77 69 6e 64 6f 77 | 28 64 69 73 70 6c 61 79 |awwindow|(display|
|00004b80| 25 29 0d 1b 62 18 f2 72 | 65 64 72 61 77 77 69 6e |%)..b..r|edrawwin|
|00004b90| 64 6f 77 28 6f 70 65 6e | 25 29 0d 1b 6c 0f 3d 65 |dow(open|%)..l.=e|
|00004ba0| 6e 64 64 69 61 6c 6f 67 | 25 0d 1b 76 05 3a 0d 1b |nddialog|%..v.:..|
|00004bb0| 80 15 dd a4 73 65 61 72 | 63 68 3a 67 6f 74 69 74 |....sear|ch:gotit|
|00004bc0| 25 3d a3 0d 1b 8a 39 f5 | 3a 24 64 73 25 3d c3 64 |%=....9.|:$ds%=.d|
|00004bd0| 72 69 76 65 25 3a 24 74 | 72 25 3d c3 74 72 61 63 |rive%:$t|r%=.trac|
|00004be0| 6b 25 3a 24 68 64 25 3d | c3 68 65 61 64 25 3a 24 |k%:$hd%=|.head%:$|
|00004bf0| 73 63 25 3d c3 73 65 63 | 74 6f 72 25 0d 1b 94 2a |sc%=.sec|tor%...*|
|00004c00| f2 72 65 64 72 61 77 77 | 69 6e 64 6f 77 28 6f 70 |.redraww|indow(op|
|00004c10| 65 6e 25 29 3a 67 25 3d | a6 30 3a e7 67 25 3d 32 |en%):g%=|.0:.g%=2|
|00004c20| 37 ef 37 3a 3d 30 0d 1b | 9e 2e f2 6c 6f 61 64 73 |7.7:=0..|...loads|
|00004c30| 65 63 74 6f 72 28 74 72 | 61 63 6b 25 2c 68 65 61 |ector(tr|ack%,hea|
|00004c40| 64 25 2c 73 65 63 74 6f | 72 25 2c 31 2c 64 72 69 |d%,secto|r%,1,dri|
|00004c50| 76 65 25 29 0d 1b a8 29 | e3 49 25 3d 30 b8 31 30 |ve%)...)|.I%=0.10|
|00004c60| 32 30 3a e7 49 25 21 53 | 25 3d 66 25 67 6f 74 69 |20:.I%!S|%=f%goti|
|00004c70| 74 25 3d b9 3a 62 79 74 | 65 25 3d 49 25 0d 1b b2 |t%=.:byt|e%=I%...|
|00004c80| 05 ed 0d 1b bc 0d e7 ac | 67 6f 74 69 74 25 8c 0d |........|gotit%..|
|00004c90| 1b c6 47 73 65 63 74 6f | 72 25 3d 28 73 65 63 74 |..Gsecto|r%=(sect|
|00004ca0| 6f 72 25 2b 31 29 83 35 | 3a e7 73 65 63 74 6f 72 |or%+1).5|:.sector|
|00004cb0| 25 3d 30 68 65 61 64 25 | 3d 28 68 65 61 64 25 2b |%=0head%|=(head%+|
|00004cc0| 31 29 83 32 3a e7 68 65 | 61 64 25 3d 30 74 72 61 |1).2:.he|ad%=0tra|
|00004cd0| 63 6b 25 2b 3d 31 0d 1b | d0 05 cc 0d 1b da 37 24 |ck%+=1..|......7$|
|00004ce0| 64 73 25 3d c3 64 72 69 | 76 65 25 3a 24 74 72 25 |ds%=.dri|ve%:$tr%|
|00004cf0| 3d c3 74 72 61 63 6b 25 | 3a 24 68 64 25 3d c3 68 |=.track%|:$hd%=.h|
|00004d00| 65 61 64 25 3a 24 73 63 | 25 3d c3 73 65 63 74 6f |ead%:$sc|%=.secto|
|00004d10| 72 25 0d 1b e4 1c 24 28 | 66 6f 75 6e 64 25 2b 32 |r%....$(|found%+2|
|00004d20| 30 29 3d 22 26 22 2b c3 | 7e 62 79 74 65 25 0d 1b |0)="&"+.|~byte%..|
|00004d30| ee 05 cd 0d 1b f8 29 fd | 28 74 72 61 63 6b 25 3d |......).|(track%=|
|00004d40| 37 39 80 68 65 61 64 25 | 3d 31 80 73 65 63 74 6f |79.head%|=1.secto|
|00004d50| 72 25 3d 34 29 84 67 6f | 74 69 74 25 0d 1c 02 0b |r%=4).go|tit%....|
|00004d60| 3d 67 6f 74 69 74 25 0d | 1c 0c 05 3a 0d 1c 16 26 |=gotit%.|...:...&|
|00004d70| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 20 53 61 76 65 20 |********|** Save |
|00004d80| 73 65 63 74 6f 72 73 20 | 2a 2a 2a 2a 2a 2a 2a 2a |sectors |********|
|00004d90| 2a 2a 0d 1c 20 05 3a 0d | 1c 2a 14 dd f2 73 61 76 |**.. .:.|.*...sav|
|00004da0| 65 66 69 6c 65 3a f7 8d | 74 44 52 0d 1c 34 56 73 |efile:..|tDR..4Vs|
|00004db0| 61 76 65 25 3d a4 63 72 | 65 61 74 65 77 69 6e 64 |ave%=.cr|eatewind|
|00004dc0| 6f 77 28 22 53 74 61 72 | 74 20 61 64 64 72 65 73 |ow("Star|t addres|
|00004dd0| 73 2c 77 74 69 74 6c 65 | 31 25 22 2c 26 42 33 2c |s,wtitle|1%",&B3,|
|00004de0| 37 2c 31 2c 38 30 32 2c | 31 34 38 2c 30 2c 30 2c |7,1,802,|148,0,0,|
|00004df0| 38 30 32 2c 31 34 38 2c | 30 2c 30 2c 2d 31 2c 30 |802,148,|0,0,-1,0|
|00004e00| 29 0d 1c 3e 1c 6e 69 63 | 6f 6e 73 25 3d 31 37 3a |)..>.nic|ons%=17:|
|00004e10| f2 69 63 6f 6e 73 28 73 | 61 76 65 25 29 0d 1c 48 |.icons(s|ave%)..H|
|00004e20| 11 73 64 25 3d 2d 31 3a | f2 73 74 6f 72 65 0d 1c |.sd%=-1:|.store..|
|00004e30| 52 2e 73 61 76 65 24 3d | 22 73 74 61 72 74 22 3a |R.save$=|"start":|
|00004e40| f2 6f 70 65 6e 77 69 6e | 64 6f 77 28 73 61 76 65 |.openwin|dow(save|
|00004e50| 25 2c 62 6c 6f 63 6b 25 | 2c 2d 31 29 0d 1c 5c 05 |%,block%|,-1)..\.|
|00004e60| e1 0d 1c 66 05 3a 0d 1c | 70 1d dd a4 63 6c 69 63 |...f.:..|p...clic|
|00004e70| 6b 64 69 61 6c 6f 67 73 | 74 61 72 74 28 69 63 6f |kdialogs|tart(ico|
|00004e80| 6e 25 29 0d 1c 7a 10 65 | 6e 64 64 69 61 6c 6f 67 |n%)..z.e|nddialog|
|00004e90| 25 3d a3 0d 1c 84 16 f2 | 67 65 74 61 64 64 72 65 |%=......|getaddre|
|00004ea0| 73 73 28 69 63 6f 6e 25 | 29 0d 1c 8e 0c c8 8e 69 |ss(icon%|)......i|
|00004eb0| 63 6f 6e 25 ca 0d 1c 98 | 10 c9 31 36 3a e7 73 64 |con%....|..16:.sd|
|00004ec0| 25 3d 2d 31 8c 0d 1c a2 | 2b 73 64 25 3d bb 24 64 |%=-1....|+sd%=.$d|
|00004ed0| 73 25 3a 73 74 25 3d bb | 24 74 72 25 3a 73 68 25 |s%:st%=.|$tr%:sh%|
|00004ee0| 3d bb 24 68 64 25 3a 73 | 73 25 3d bb 24 73 63 25 |=.$hd%:s|s%=.$sc%|
|00004ef0| 0d 1c ac 1b 24 77 74 69 | 74 6c 65 31 25 3d 22 45 |....$wti|tle1%="E|
|00004f00| 6e 64 20 61 64 64 72 65 | 73 73 22 0d 1c b6 05 cc |nd addre|ss".....|
|00004f10| 0d 1c c0 10 65 6e 64 64 | 69 61 6c 6f 67 25 3d b9 |....endd|ialog%=.|
|00004f20| 0d 1c ca 2b 65 64 25 3d | bb 24 64 73 25 3a 65 74 |...+ed%=|.$ds%:et|
|00004f30| 25 3d bb 24 74 72 25 3a | 65 68 25 3d bb 24 68 64 |%=.$tr%:|eh%=.$hd|
|00004f40| 25 3a 65 73 25 3d bb 24 | 73 63 25 0d 1c d4 13 f7 |%:es%=.$|sc%.....|
|00004f50| 8d 44 48 52 3a 73 61 76 | 65 31 24 3d 22 22 0d 1c |.DHR:sav|e1$=""..|
|00004f60| de 30 73 61 76 65 31 25 | 3d a4 63 72 65 61 74 65 |.0save1%|=.create|
|00004f70| 64 69 61 6c 6f 67 28 31 | 2c 31 2c 26 39 33 2c 22 |dialog(1|,1,&93,"|
|00004f80| 53 61 76 65 3a 22 2c 73 | 61 76 65 31 24 29 0d 1c |Save:",s|ave1$)..|
|00004f90| e8 30 c8 99 22 57 69 6d | 70 5f 53 65 74 43 61 72 |.0.."Wim|p_SetCar|
|00004fa0| 65 74 50 6f 73 69 74 69 | 6f 6e 22 2c 73 61 76 65 |etPositi|on",save|
|00004fb0| 31 25 2c 30 2c 30 2c 30 | 2c 2d 31 2c 2d 31 0d 1c |1%,0,0,0|,-1,-1..|
|00004fc0| f2 05 cd 0d 1c fc 05 cb | 0d 1d 06 37 24 64 73 25 |........|...7$ds%|
|00004fd0| 3d c3 64 72 69 76 65 25 | 3a 24 74 72 25 3d c3 74 |=.drive%|:$tr%=.t|
|00004fe0| 72 61 63 6b 25 3a 24 68 | 64 25 3d c3 68 65 61 64 |rack%:$h|d%=.head|
|00004ff0| 25 3a 24 73 63 25 3d c3 | 73 65 63 74 6f 72 25 0d |%:$sc%=.|sector%.|
|00005000| 1d 10 18 f2 72 65 64 72 | 61 77 77 69 6e 64 6f 77 |....redr|awwindow|
|00005010| 28 73 61 76 65 25 29 0d | 1d 1a 0f 3d 65 6e 64 64 |(save%).|...=endd|
|00005020| 69 61 6c 6f 67 25 0d 1d | 24 05 3a 0d 1d 2e 20 dd |ialog%..|$.:... .|
|00005030| a4 63 6c 69 63 6b 64 69 | 61 6c 6f 67 73 61 76 65 |.clickdi|alogsave|
|00005040| 66 69 6c 65 28 69 63 6f | 6e 25 29 0d 1d 38 10 65 |file(ico|n%)..8.e|
|00005050| 6e 64 64 69 61 6c 6f 67 | 25 3d a3 0d 1d 42 0c c8 |nddialog|%=...B..|
|00005060| 8e 69 63 6f 6e 25 ca 0d | 1d 4c 06 c9 31 0d 1d 56 |.icon%..|.L..1..V|
|00005070| 12 e7 a7 24 66 69 6c 65 | 25 2c 22 2e 22 29 8c 0d |...$file|%,".")..|
|00005080| 1d 60 2a f2 6c 6f 61 64 | 73 65 63 74 6f 72 28 73 |.`*.load|sector(s|
|00005090| 74 25 2c 73 68 25 2c 73 | 73 25 2c 6c 65 6e 25 2b |t%,sh%,s|s%,len%+|
|000050a0| 31 2c 64 72 69 76 65 25 | 29 0d 1d 6a 27 ff 28 22 |1,drive%|)..j'.("|
|000050b0| 53 41 56 45 20 22 2b 24 | 66 69 6c 65 25 2b 22 20 |SAVE "+$|file%+" |
|000050c0| 22 2b c3 7e 53 25 2b 22 | 2b 22 2b c3 7e 4c 25 29 |"+.~S%+"|+"+.~L%)|
|000050d0| 0d 1d 74 07 cc ef 37 0d | 1d 7e 05 cd 0d 1d 88 10 |..t...7.|.~......|
|000050e0| 65 6e 64 64 69 61 6c 6f | 67 25 3d b9 0d 1d 92 0c |enddialo|g%=.....|
|000050f0| f2 72 65 73 74 6f 72 65 | 0d 1d 9c 20 c9 32 3a f2 |.restore|... .2:.|
|00005100| 69 6e 69 74 64 72 61 67 | 28 73 61 76 65 31 25 2c |initdrag|(save1%,|
|00005110| 69 63 6f 6e 25 2c 35 29 | 0d 1d a6 0c f2 72 65 73 |icon%,5)|.....res|
|00005120| 74 6f 72 65 0d 1d b0 05 | cb 0d 1d ba 0f 3d 65 6e |tore....|.....=en|
|00005130| 64 64 69 61 6c 6f 67 25 | 0d 1d c4 05 3a 0d 1d ce |ddialog%|....:...|
|00005140| 2b 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 20 43 6f 6d 70 |+*******|*** Comp|
|00005150| 61 72 65 20 74 77 6f 20 | 64 69 73 6b 73 20 2a 2a |are two |disks **|
|00005160| 2a 2a 2a 2a 2a 2a 2a 2a | 0d 1d d8 05 3a 0d 1d e2 |********|....:...|
|00005170| 1e dd f2 63 6f 6d 70 61 | 72 65 3a 45 25 3d 53 25 |...compa|re:E%=S%|
|00005180| 2b 31 30 32 34 3a f7 8d | 74 44 52 0d 1d ec 56 63 |+1024:..|tDR...Vc|
|00005190| 6f 6d 70 25 3d a4 63 72 | 65 61 74 65 77 69 6e 64 |omp%=.cr|eatewind|
|000051a0| 6f 77 28 22 53 74 61 72 | 74 20 61 64 64 72 65 73 |ow("Star|t addres|
|000051b0| 73 2c 77 74 69 74 6c 65 | 31 25 22 2c 26 42 33 2c |s,wtitle|1%",&B3,|
|000051c0| 37 2c 31 2c 38 30 32 2c | 31 34 38 2c 30 2c 30 2c |7,1,802,|148,0,0,|
|000051d0| 38 30 32 2c 31 34 38 2c | 30 2c 30 2c 2d 31 2c 30 |802,148,|0,0,-1,0|
|000051e0| 29 0d 1d f6 1c 6e 69 63 | 6f 6e 73 25 3d 31 37 3a |)....nic|ons%=17:|
|000051f0| f2 69 63 6f 6e 73 28 63 | 6f 6d 70 25 29 0d 1e 00 |.icons(c|omp%)...|
|00005200| 18 49 25 3d 30 3a 63 6f | 6d 70 64 25 3d 31 3a f2 |.I%=0:co|mpd%=1:.|
|00005210| 73 74 6f 72 65 0d 1e 0a | 2d 63 6f 6d 70 24 3d 22 |store...|-comp$="|
|00005220| 63 6f 6d 70 22 3a f2 6f | 70 65 6e 77 69 6e 64 6f |comp":.o|penwindo|
|00005230| 77 28 63 6f 6d 70 25 2c | 62 6c 6f 63 6b 25 2c 2d |w(comp%,|block%,-|
|00005240| 31 29 0d 1e 14 05 e1 0d | 1e 1e 05 3a 0d 1e 28 1c |1)......|...:..(.|
|00005250| dd a4 63 6c 69 63 6b 64 | 69 61 6c 6f 67 63 6f 6d |..clickd|ialogcom|
|00005260| 70 28 69 63 6f 6e 25 29 | 0d 1e 32 10 65 6e 64 64 |p(icon%)|..2.endd|
|00005270| 69 61 6c 6f 67 25 3d a3 | 0d 1e 3c 16 f2 67 65 74 |ialog%=.|..<..get|
|00005280| 61 64 64 72 65 73 73 28 | 69 63 6f 6e 25 29 0d 1e |address(|icon%)..|
|00005290| 46 0c c8 8e 69 63 6f 6e | 25 ca 0d 1e 50 11 c9 31 |F...icon|%...P..1|
|000052a0| 36 3a c8 8e 63 6f 6d 70 | 64 25 ca 0d 1e 5a 06 c9 |6:..comp|d%...Z..|
|000052b0| 31 0d 1e 64 2b 73 64 25 | 3d bb 24 64 73 25 3a 73 |1..d+sd%|=.$ds%:s|
|000052c0| 74 25 3d bb 24 74 72 25 | 3a 73 68 25 3d bb 24 68 |t%=.$tr%|:sh%=.$h|
|000052d0| 64 25 3a 73 73 25 3d bb | 24 73 63 25 0d 1e 6e 24 |d%:ss%=.|$sc%..n$|
|000052e0| 24 77 74 69 74 6c 65 31 | 25 3d 22 45 6e 64 20 61 |$wtitle1|%="End a|
|000052f0| 64 64 72 65 73 73 22 3a | 63 6f 6d 70 64 25 3d 32 |ddress":|compd%=2|
|00005300| 0d 1e 78 06 c9 32 0d 1e | 82 2b 65 64 25 3d bb 24 |..x..2..|.+ed%=.$|
|00005310| 64 73 25 3a 65 74 25 3d | bb 24 74 72 25 3a 65 68 |ds%:et%=|.$tr%:eh|
|00005320| 25 3d bb 24 68 64 25 3a | 65 73 25 3d bb 24 73 63 |%=.$hd%:|es%=.$sc|
|00005330| 25 0d 1e 8c 27 65 6e 64 | 64 69 61 6c 6f 67 25 3d |%...'end|dialog%=|
|00005340| b9 3a 63 6f 6d 70 31 24 | 3d 22 63 6f 6d 70 61 72 |.:comp1$|="compar|
|00005350| 65 22 3a f7 8d 44 7e 53 | 0d 1e 96 0f e7 a4 63 6f |e":..D~S|......co|
|00005360| 6d 70 61 72 65 20 8c 0d | 1e a0 32 63 6f 6d 70 31 |mpare ..|..2comp1|
|00005370| 25 3d a4 63 72 65 61 74 | 65 64 69 61 6c 6f 67 28 |%=.creat|edialog(|
|00005380| 31 2c 30 2c 26 39 33 2c | 22 43 6f 6d 70 61 72 65 |1,0,&93,|"Compare|
|00005390| 22 2c 63 6f 6d 70 31 24 | 29 0d 1e aa 14 63 6f 6d |",comp1$|)....com|
|000053a0| 70 31 24 3d 22 63 6f 6d | 70 61 72 65 22 0d 1e b4 |p1$="com|pare"...|
|000053b0| 05 cd 0d 1e be 05 cb 0d | 1e c8 05 cb 0d 1e d2 37 |........|.......7|
|000053c0| 24 64 73 25 3d c3 64 72 | 69 76 65 25 3a 24 74 72 |$ds%=.dr|ive%:$tr|
|000053d0| 25 3d c3 74 72 61 63 6b | 25 3a 24 68 64 25 3d c3 |%=.track|%:$hd%=.|
|000053e0| 68 65 61 64 25 3a 24 73 | 63 25 3d c3 73 65 63 74 |head%:$s|c%=.sect|
|000053f0| 6f 72 25 0d 1e dc 18 f2 | 72 65 64 72 61 77 77 69 |or%.....|redrawwi|
|00005400| 6e 64 6f 77 28 63 6f 6d | 70 25 29 0d 1e e6 0f 3d |ndow(com|p%)....=|
|00005410| 65 6e 64 64 69 61 6c 6f | 67 25 0d 1e f0 05 3a 0d |enddialo|g%....:.|
|00005420| 1e fa 1f dd a4 63 6c 69 | 63 6b 64 69 61 6c 6f 67 |.....cli|ckdialog|
|00005430| 63 6f 6d 70 61 72 65 28 | 69 63 6f 6e 25 29 0d 1f |compare(|icon%)..|
|00005440| 04 1a 65 6e 64 64 69 61 | 6c 6f 67 25 3d a3 3a e7 |..enddia|log%=.:.|
|00005450| 67 25 3d 32 37 3a 3d b9 | 0d 1f 0e 0c c8 8e 69 63 |g%=27:=.|......ic|
|00005460| 6f 6e 25 ca 0d 1f 18 3b | c9 30 3a e7 a4 63 6f 6d |on%....;|.0:..com|
|00005470| 70 61 72 65 20 f2 72 65 | 64 72 61 77 77 69 6e 64 |pare .re|drawwind|
|00005480| 6f 77 28 63 6f 6d 70 31 | 25 29 3a f4 45 4c 53 45 |ow(comp1|%):.ELSE|
|00005490| 65 6e 64 64 69 61 6c 6f | 67 25 3d 54 52 55 45 0d |enddialo|g%=TRUE.|
|000054a0| 1f 22 13 c9 31 3a 65 6e | 64 64 69 61 6c 6f 67 25 |."..1:en|ddialog%|
|000054b0| 3d b9 0d 1f 2c 05 cb 0d | 1f 36 0f 3d 65 6e 64 64 |=...,...|.6.=endd|
|000054c0| 69 61 6c 6f 67 25 0d 1f | 40 04 0d 1f 4a 16 dd a4 |ialog%..|@...J...|
|000054d0| 63 6f 6d 70 61 72 65 3a | f5 3a e7 49 25 3d 30 8c |compare:|.:.I%=0.|
|000054e0| 0d 1f 54 2e 64 69 73 63 | 61 64 64 72 25 3d 28 28 |..T.disc|addr%=((|
|000054f0| 73 74 25 2a 32 2b 73 68 | 25 29 2a 35 2b 73 73 25 |st%*2+sh|%)*5+ss%|
|00005500| 29 2a 31 30 32 34 2b 28 | 30 3c 3c 32 39 29 0d 1f |)*1024+(|0<<29)..|
|00005510| 5e 29 c8 99 22 41 44 46 | 53 5f 44 69 73 63 4f 70 |^).."ADF|S_DiscOp|
|00005520| 22 2c 30 2c 31 2c 64 69 | 73 63 61 64 64 72 25 2c |",0,1,di|scaddr%,|
|00005530| 53 25 2c 31 30 32 34 0d | 1f 68 16 64 69 73 63 61 |S%,1024.|.h.disca|
|00005540| 64 64 72 25 2b 3d 28 31 | 3c 3c 32 39 29 0d 1f 72 |ddr%+=(1|<<29)..r|
|00005550| 29 c8 99 22 41 44 46 53 | 5f 44 69 73 63 4f 70 22 |).."ADFS|_DiscOp"|
|00005560| 2c 30 2c 31 2c 64 69 73 | 63 61 64 64 72 25 2c 45 |,0,1,dis|caddr%,E|
|00005570| 25 2c 31 30 32 34 0d 1f | 7c 05 cd 0d 1f 86 1c 6e |%,1024..||......n|
|00005580| 63 25 3d 2d 31 3a 67 25 | 3d a6 30 3a e7 67 25 3d |c%=-1:g%|=.0:.g%=|
|00005590| 32 37 ef 37 3a 3d 30 0d | 1f 90 19 f5 3a e7 49 25 |27.7:=0.|....:.I%|
|000055a0| 3f 53 25 3c 3e 49 25 3f | 45 25 6e 63 25 3d 49 25 |?S%<>I%?|E%nc%=I%|
|000055b0| 0d 1f 9a 19 49 25 2b 3d | 31 3a fd 49 25 3d 31 30 |....I%+=|1:.I%=10|
|000055c0| 32 34 84 6e 63 25 3e 2d | 31 0d 1f a4 3f e7 49 25 |24.nc%>-|1...?.I%|
|000055d0| 3d 31 30 32 34 49 25 3d | 30 3a 73 73 25 3d 28 73 |=1024I%=|0:ss%=(s|
|000055e0| 73 25 2b 31 29 83 35 3a | e7 73 73 25 3d 30 73 68 |s%+1).5:|.ss%=0sh|
|000055f0| 25 3d 28 73 68 25 2b 31 | 29 83 32 3a e7 73 68 25 |%=(sh%+1|).2:.sh%|
|00005600| 3d 30 73 74 25 2b 3d 31 | 0d 1f ae 21 24 74 72 25 |=0st%+=1|...!$tr%|
|00005610| 3d c3 73 74 25 3a 24 68 | 64 25 3d c3 73 68 25 3a |=.st%:$h|d%=.sh%:|
|00005620| 24 73 63 25 3d c3 73 73 | 25 0d 1f b8 18 f2 72 65 |$sc%=.ss|%.....re|
|00005630| 64 72 61 77 77 69 6e 64 | 6f 77 28 6f 70 65 6e 25 |drawwind|ow(open%|
|00005640| 29 0d 1f c2 22 fd 28 73 | 74 25 3d 65 74 25 80 73 |)...".(s|t%=et%.s|
|00005650| 68 25 3d 65 68 25 80 73 | 73 25 3d 65 73 25 29 84 |h%=eh%.s|s%=es%).|
|00005660| 6e 63 25 0d 1f cc 1a 24 | 28 66 6f 75 6e 64 25 2b |nc%....$|(found%+|
|00005670| 32 30 29 3d 22 26 22 2b | c3 7e 6e 63 25 0d 1f d6 |20)="&"+|.~nc%...|
|00005680| 29 e7 73 74 25 3d 65 74 | 25 80 73 68 25 3d 65 68 |).st%=et|%.sh%=eh|
|00005690| 25 80 73 73 25 3d 65 73 | 25 3a 3d 30 8b 3d 28 6e |%.ss%=es|%:=0.=(n|
|000056a0| 63 25 3e 2d 31 29 0d 1f | e0 05 3a 0d 1f ea 2d 2a |c%>-1)..|..:...-*|
|000056b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 20 53 61 76 65 20 63 |********|* Save c|
|000056c0| 75 72 72 65 6e 74 20 73 | 65 63 74 6f 72 20 2a 2a |urrent s|ector **|
|000056d0| 2a 2a 2a 2a 2a 2a 2a 2a | 0d 1f f4 04 0d 1f fe 1f |********|........|
|000056e0| dd a4 63 6c 69 63 6b 64 | 69 61 6c 6f 67 73 61 76 |..clickd|ialogsav|
|000056f0| 65 73 65 63 28 69 63 6f | 6e 25 29 0d 20 08 10 65 |esec(ico|n%). ..e|
|00005700| 6e 64 64 69 61 6c 6f 67 | 25 3d a3 0d 20 12 0c c8 |nddialog|%=.. ...|
|00005710| 8e 69 63 6f 6e 25 ca 0d | 20 1c 13 c9 30 3a 65 6e |.icon%..| ...0:en|
|00005720| 64 64 69 61 6c 6f 67 25 | 3d b9 0d 20 26 0e f2 70 |ddialog%|=.. &..p|
|00005730| 65 72 6d 61 6e 65 6e 74 | 0d 20 30 06 c9 31 0d 20 |ermanent|. 0..1. |
|00005740| 3a 10 65 6e 64 64 69 61 | 6c 6f 67 25 3d b9 0d 20 |:.enddia|log%=.. |
|00005750| 44 05 cb 0d 20 4e 26 e7 | 65 6e 64 64 69 61 6c 6f |D... N&.|enddialo|
|00005760| 67 25 c8 99 22 57 69 6d | 70 5f 43 72 65 61 74 65 |g%.."Wim|p_Create|
|00005770| 4d 65 6e 75 22 2c 2c 2d | 31 0d 20 58 0f 3d 65 6e |Menu",,-|1. X.=en|
|00005780| 64 64 69 61 6c 6f 67 25 | 0d 20 62 05 3a 0d 20 6c |ddialog%|. b.:. l|
|00005790| 2b 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 20 4b 65 79 62 |+*******|*** Keyb|
|000057a0| 6f 61 72 64 20 72 6f 75 | 74 69 6e 65 73 20 2a 2a |oard rou|tines **|
|000057b0| 2a 2a 2a 2a 2a 2a 2a 2a | 0d 20 76 05 3a 0d 20 80 |********|. v.:. .|
|000057c0| 0f dd f2 68 65 78 28 6b | 65 79 25 29 0d 20 8a 20 |...hex(k|ey%). . |
|000057d0| e7 a7 22 30 31 32 33 34 | 35 36 37 38 39 41 42 43 |.."01234|56789ABC|
|000057e0| 44 45 46 22 2c bd 6b 65 | 79 25 29 8c 0d 20 94 16 |DEF",.ke|y%).. ..|
|000057f0| 66 69 72 73 74 25 3d 28 | 28 73 78 25 2d 36 29 83 |first%=(|(sx%-6).|
|00005800| 33 29 0d 20 9e 0e e7 66 | 69 72 73 74 25 3d 30 8c |3). ...f|irst%=0.|
|00005810| 0d 20 a8 1d c1 6c 24 28 | 6c 69 6e 65 25 29 2c 73 |. ...l$(|line%),s|
|00005820| 78 25 2b 31 2c 31 29 3d | bd 6b 65 79 25 0d 20 b2 |x%+1,1)=|.key%. .|
|00005830| 23 61 73 63 25 3d a0 28 | 22 26 22 2b c1 6c 24 28 |#asc%=.(|"&"+.l$(|
|00005840| 6c 69 6e 65 25 29 2c 73 | 78 25 2b 31 2c 32 29 29 |line%),s|x%+1,2))|
|00005850| 0d 20 bc 1d e7 61 73 63 | 25 3e 33 31 80 61 73 63 |. ...asc|%>31.asc|
|00005860| 25 3c 32 35 36 8b 61 73 | 63 25 3d 34 36 0d 20 c6 |%<256.as|c%=46. .|
|00005870| 24 c1 6c 24 28 6c 69 6e | 65 25 29 2c 35 38 2b 28 |$.l$(lin|e%),58+(|
|00005880| 73 78 25 2d 36 29 81 33 | 2c 31 29 3d bd 61 73 63 |sx%-6).3|,1)=.asc|
|00005890| 25 0d 20 d0 12 63 78 25 | 2b 3d 31 36 3a 73 78 25 |%. ..cx%|+=16:sx%|
|000058a0| 2b 3d 31 0d 20 da 37 c8 | 99 22 57 69 6d 70 5f 53 |+=1. .7.|."Wimp_S|
|000058b0| 65 74 43 61 72 65 74 50 | 6f 73 69 74 69 6f 6e 22 |etCaretP|osition"|
|000058c0| 2c 68 61 6e 64 6c 65 25 | 2c 2d 31 2c 63 78 25 2c |,handle%|,-1,cx%,|
|000058d0| 63 79 25 2c 33 36 2c 73 | 78 25 0d 20 e4 05 cc 0d |cy%,36,s|x%. ....|
|000058e0| 20 ee 0e e7 66 69 72 73 | 74 25 3d 31 8c 0d 20 f8 | ...firs|t%=1.. .|
|000058f0| 1d c1 6c 24 28 6c 69 6e | 65 25 29 2c 73 78 25 2b |..l$(lin|e%),sx%+|
|00005900| 31 2c 31 29 3d bd 6b 65 | 79 25 0d 21 02 21 61 73 |1,1)=.ke|y%.!.!as|
|00005910| 63 25 3d a0 28 22 26 22 | 2b c1 6c 24 28 6c 69 6e |c%=.("&"|+.l$(lin|
|00005920| 65 25 29 2c 73 78 25 2c | 32 29 29 0d 21 0c 1d e7 |e%),sx%,|2)).!...|
|00005930| 61 73 63 25 3e 33 31 80 | 61 73 63 25 3c 32 35 36 |asc%>31.|asc%<256|
|00005940| 8b 61 73 63 25 3d 34 36 | 0d 21 16 24 c1 6c 24 28 |.asc%=46|.!.$.l$(|
|00005950| 6c 69 6e 65 25 29 2c 35 | 38 2b 28 73 78 25 2d 37 |line%),5|8+(sx%-7|
|00005960| 29 81 33 2c 31 29 3d bd | 61 73 63 25 0d 21 20 12 |).3,1)=.|asc%.! .|
|00005970| 63 78 25 2d 3d 31 36 3a | 73 78 25 2d 3d 31 0d 21 |cx%-=16:|sx%-=1.!|
|00005980| 2a 37 c8 99 22 57 69 6d | 70 5f 53 65 74 43 61 72 |*7.."Wim|p_SetCar|
|00005990| 65 74 50 6f 73 69 74 69 | 6f 6e 22 2c 68 61 6e 64 |etPositi|on",hand|
|000059a0| 6c 65 25 2c 2d 31 2c 63 | 78 25 2c 63 79 25 2c 33 |le%,-1,c|x%,cy%,3|
|000059b0| 36 2c 73 78 25 0d 21 34 | 05 cd 0d 21 3e 05 cd 0d |6,sx%.!4|...!>...|
|000059c0| 21 48 1a f2 72 65 64 72 | 61 77 77 69 6e 64 6f 77 |!H..redr|awwindow|
|000059d0| 28 68 61 6e 64 6c 65 25 | 29 0d 21 52 05 cd 0d 21 |(handle%|).!R...!|
|000059e0| 5c 05 e1 0d 21 66 05 3a | 0d 21 70 11 dd f2 61 73 |\...!f.:|.!p...as|
|000059f0| 63 69 69 28 6b 65 79 25 | 29 0d 21 7a 16 e7 6b 65 |cii(key%|).!z..ke|
|00005a00| 79 25 3e 33 31 80 6b 65 | 79 25 3c 31 32 37 8c 0d |y%>31.ke|y%<127..|
|00005a10| 21 84 1d c1 6c 24 28 6c | 69 6e 65 25 29 2c 73 78 |!...l$(l|ine%),sx|
|00005a20| 25 2b 31 2c 31 29 3d bd | 6b 65 79 25 0d 21 8e 29 |%+1,1)=.|key%.!.)|
|00005a30| c1 6c 24 28 6c 69 6e 65 | 25 29 2c 28 73 78 25 2d |.l$(line|%),(sx%-|
|00005a40| 35 37 29 2a 33 2b 37 2c | 32 29 3d a4 70 61 64 28 |57)*3+7,|2)=.pad(|
|00005a50| 6b 65 79 25 29 0d 21 98 | 12 63 78 25 2b 3d 31 36 |key%).!.|.cx%+=16|
|00005a60| 3a 73 78 25 2b 3d 31 0d | 21 a2 37 c8 99 22 57 69 |:sx%+=1.|!.7.."Wi|
|00005a70| 6d 70 5f 53 65 74 43 61 | 72 65 74 50 6f 73 69 74 |mp_SetCa|retPosit|
|00005a80| 69 6f 6e 22 2c 68 61 6e | 64 6c 65 25 2c 2d 31 2c |ion",han|dle%,-1,|
|00005a90| 63 78 25 2c 63 79 25 2c | 33 36 2c 73 78 25 0d 21 |cx%,cy%,|36,sx%.!|
|00005aa0| ac 1a f2 72 65 64 72 61 | 77 77 69 6e 64 6f 77 28 |...redra|wwindow(|
|00005ab0| 68 61 6e 64 6c 65 25 29 | 0d 21 b6 05 cd 0d 21 c0 |handle%)|.!....!.|
|00005ac0| 05 e1 0d 21 ca 05 3a 0d | 21 d4 0f dd f2 70 65 72 |...!..:.|!....per|
|00005ad0| 6d 61 6e 65 6e 74 0d 21 | de 49 e3 49 25 3d 30 b8 |manent.!|.I.I%=0.|
|00005ae0| 36 33 3a 4c 25 3d 49 25 | 2a 31 36 2b 53 25 3a e3 |63:L%=I%|*16+S%:.|
|00005af0| 4a 25 3d 30 b8 31 35 3a | 43 25 3d a0 28 22 26 22 |J%=0.15:|C%=.("&"|
|00005b00| 2b c1 6c 24 28 49 25 29 | 2c 37 2b 4a 25 2a 33 2c |+.l$(I%)|,7+J%*3,|
|00005b10| 32 29 29 3a 4c 25 3f 4a | 25 3d 43 25 3a ed 2c 0d |2)):L%?J|%=C%:.,.|
|00005b20| 21 e8 22 f2 73 61 76 65 | 73 65 63 74 6f 72 28 74 |!.".save|sector(t|
|00005b30| 74 25 2c 74 68 25 2c 74 | 73 25 2c 31 2c 74 64 25 |t%,th%,t|s%,1,td%|
|00005b40| 29 0d 21 f2 05 e1 0d 21 | fc 05 3a 0d 22 06 27 2a |).!....!|..:.".'*|
|00005b50| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 20 4d 69 73 63 20 72 |********|* Misc r|
|00005b60| 6f 75 74 69 6e 65 73 20 | 2a 2a 2a 2a 2a 2a 2a 2a |outines |********|
|00005b70| 2a 2a 0d 22 10 05 3a 0d | 22 1a 21 dd f2 72 65 64 |**."..:.|".!..red|
|00005b80| 6f 77 69 6e 64 6f 77 28 | 68 61 6e 64 6c 65 25 2c |owindow(|handle%,|
|00005b90| 78 30 25 2c 79 30 25 29 | 0d 22 24 1e f2 6c 77 61 |x0%,y0%)|."$..lwa|
|00005ba0| 6f 72 69 67 69 6e 28 62 | 6c 6f 63 6b 25 2c 78 30 |origin(b|lock%,x0|
|00005bb0| 25 2c 79 30 25 29 0d 22 | 2e 0e c8 8e 68 61 6e 64 |%,y0%)."|....hand|
|00005bc0| 6c 65 25 ca 0d 22 38 0d | c9 69 6e 66 6f 25 3a e6 |le%.."8.|.info%:.|
|00005bd0| 30 0d 22 42 2d e3 69 25 | 3d 30 b8 33 3a c8 93 c8 |0."B-.i%|=0.3:...|
|00005be0| 90 78 30 25 2b 31 36 30 | 2c 79 30 25 2b 32 30 2b |.x0%+160|,y0%+20+|
|00005bf0| 34 38 2a 69 25 2c 34 32 | 30 2c 34 30 3a ed 0d 22 |48*i%,42|0,40:.."|
|00005c00| 4c 06 e6 37 0d 22 56 2b | e3 69 25 3d 30 b8 33 3a |L..7."V+|.i%=0.3:|
|00005c10| c8 93 78 30 25 2b 31 36 | 30 2c 79 30 25 2b 32 30 |..x0%+16|0,y0%+20|
|00005c20| 2b 34 38 2a 69 25 2c 34 | 32 30 2c 34 30 3a ed 0d |+48*i%,4|20,40:..|
|00005c30| 22 60 1b ec 78 30 25 2b | 32 30 2c 79 30 25 2b 31 |"`..x0%+|20,y0%+1|
|00005c40| 39 36 3a f1 22 4e 61 6d | 65 22 0d 22 6a 1d ec 78 |96:."Nam|e"."j..x|
|00005c50| 30 25 2b 33 33 30 2c 79 | 30 25 2b 31 39 36 3a f1 |0%+330,y|0%+196:.|
|00005c60| 22 21 44 7a 61 70 22 0d | 22 74 1e ec 78 30 25 2b |"!Dzap".|"t..x0%+|
|00005c70| 32 30 2c 79 30 25 2b 31 | 34 38 3a f1 22 50 75 72 |20,y0%+1|48:."Pur|
|00005c80| 70 6f 73 65 22 0d 22 7e | 2a ec 78 30 25 2b 32 32 |pose"."~|*.x0%+22|
|00005c90| 36 2c 79 30 25 2b 31 34 | 38 3a f1 22 44 69 73 63 |6,y0%+14|8:."Disc|
|00005ca0| 20 73 65 63 74 6f 72 20 | 65 64 69 74 6f 72 22 0d | sector |editor".|
|00005cb0| 22 88 1d ec 78 30 25 2b | 32 30 2c 79 30 25 2b 31 |"...x0%+|20,y0%+1|
|00005cc0| 30 30 3a f1 22 41 75 74 | 68 6f 72 22 0d 22 92 2e |00:."Aut|hor"."..|
|00005cd0| ec 78 30 25 2b 32 30 32 | 2c 79 30 25 2b 31 30 30 |.x0%+202|,y0%+100|
|00005ce0| 3a f1 22 47 20 4d 20 48 | 6f 6c 64 65 6e 20 28 63 |:."G M H|olden (c|
|00005cf0| 29 20 41 53 50 20 27 39 | 31 22 0d 22 9c 1d ec 78 |) ASP '9|1"."...x|
|00005d00| 30 25 2b 32 30 2c 79 30 | 25 2b 35 32 3a f1 22 56 |0%+20,y0|%+52:."V|
|00005d10| 65 72 73 69 6f 6e 22 0d | 22 a6 1c ec 78 30 25 2b |ersion".|"...x0%+|
|00005d20| 33 33 30 2c 79 30 25 2b | 35 32 3a f1 22 76 20 31 |330,y0%+|52:."v 1|
|00005d30| 2e 30 22 0d 22 b0 16 c9 | 63 61 74 25 3a 79 30 25 |.0"."...|cat%:y0%|
|00005d40| 2d 3d 34 3a 49 25 3d 2d | 31 0d 22 ba 1e 62 79 25 |-=4:I%=-|1."..by%|
|00005d50| 3d 62 6c 6f 63 6b 25 21 | 38 3a 74 79 25 3d 62 6c |=block%!|8:ty%=bl|
|00005d60| 6f 63 6b 25 21 31 36 0d | 22 c4 1d f5 3a 49 25 2b |ock%!16.|"...:I%+|
|00005d70| 3d 31 3a fd 79 30 25 2b | 49 25 2a 33 32 3e 62 79 |=1:.y0%+|I%*32>by|
|00005d80| 25 2d 33 32 0d 22 ce 3a | f5 3a 49 25 2b 3d 31 3a |%-32.".:|.:I%+=1:|
|00005d90| ec 78 30 25 2c 79 30 25 | 2b 49 25 2a 33 32 3a f1 |.x0%,y0%|+I%*32:.|
|00005da0| 6e 24 28 6e 25 2d 49 25 | 29 3a fd 79 30 25 2b 49 |n$(n%-I%|):.y0%+I|
|00005db0| 25 2a 33 32 3e 74 79 25 | 84 49 25 3d 6e 25 0d 22 |%*32>ty%|.I%=n%."|
|00005dc0| d8 1a c9 64 69 73 70 6c | 61 79 25 3a 79 30 25 2d |...displ|ay%:y0%-|
|00005dd0| 3d 34 3a 49 25 3d 2d 31 | 0d 22 e2 1e 62 79 25 3d |=4:I%=-1|."..by%=|
|00005de0| 62 6c 6f 63 6b 25 21 38 | 3a 74 79 25 3d 62 6c 6f |block%!8|:ty%=blo|
|00005df0| 63 6b 25 21 31 36 0d 22 | ec 1d f5 3a 49 25 2b 3d |ck%!16."|...:I%+=|
|00005e00| 31 3a fd 79 30 25 2b 49 | 25 2a 33 32 3e 62 79 25 |1:.y0%+I|%*32>by%|
|00005e10| 2d 33 32 0d 22 f6 3a f5 | 3a 49 25 2b 3d 31 3a ec |-32.".:.|:I%+=1:.|
|00005e20| 78 30 25 2c 79 30 25 2b | 49 25 2a 33 32 3a f1 6c |x0%,y0%+|I%*32:.l|
|00005e30| 24 28 36 34 2d 49 25 29 | 3a fd 79 30 25 2b 49 25 |$(64-I%)|:.y0%+I%|
|00005e40| 2a 33 32 3e 74 79 25 84 | 49 25 3d 36 34 0d 23 00 |*32>ty%.|I%=64.#.|
|00005e50| 05 cb 0d 23 0a 05 e1 0d | 23 14 05 3a 0d 23 1e 14 |...#....|#..:.#..|
|00005e60| dd f2 73 74 6f 72 65 3a | 44 25 3d bb 24 64 73 25 |..store:|D%=.$ds%|
|00005e70| 0d 23 28 1e 54 25 3d bb | 24 74 72 25 3a 48 25 3d |.#(.T%=.|$tr%:H%=|
|00005e80| bb 24 68 64 25 3a 5a 25 | 3d bb 24 73 63 25 0d 23 |.$hd%:Z%|=.$sc%.#|
|00005e90| 32 2b 64 72 69 76 65 25 | 3d 44 25 3a 74 72 61 63 |2+drive%|=D%:trac|
|00005ea0| 6b 25 3d 54 25 3a 68 65 | 61 64 25 3d 48 25 3a 73 |k%=T%:he|ad%=H%:s|
|00005eb0| 65 63 74 6f 72 25 3d 5a | 25 0d 23 3c 05 e1 0d 23 |ector%=Z|%.#<...#|
|00005ec0| 46 05 3a 0d 23 50 16 dd | f2 72 65 73 74 6f 72 65 |F.:.#P..|.restore|
|00005ed0| 3a 24 64 73 25 3d c3 44 | 25 0d 23 5a 1e 24 74 72 |:$ds%=.D|%.#Z.$tr|
|00005ee0| 25 3d c3 54 25 3a 24 68 | 64 25 3d c3 48 25 3a 24 |%=.T%:$h|d%=.H%:$|
|00005ef0| 73 63 25 3d c3 5a 25 0d | 23 64 05 e1 0d 23 6e 05 |sc%=.Z%.|#d...#n.|
|00005f00| 3a 0d 23 78 20 dd f2 6c | 6f 61 64 73 65 63 74 6f |:.#x ..l|oadsecto|
|00005f10| 72 28 74 25 2c 68 25 2c | 73 25 2c 6c 25 2c 64 25 |r(t%,h%,|s%,l%,d%|
|00005f20| 29 0d 23 82 23 64 69 73 | 63 61 64 64 72 25 3d 28 |).#.#dis|caddr%=(|
|00005f30| 28 74 25 2a 32 2b 68 25 | 29 2a 35 2b 73 25 29 2a |(t%*2+h%|)*5+s%)*|
|00005f40| 31 30 32 34 0d 23 8c 24 | 6c 65 6e 25 3d 31 30 32 |1024.#.$|len%=102|
|00005f50| 34 2a 6c 25 3a 64 69 73 | 63 61 64 64 72 25 2b 3d |4*l%:dis|caddr%+=|
|00005f60| 28 64 25 3c 3c 32 39 29 | 0d 23 96 29 c8 99 22 41 |(d%<<29)|.#.).."A|
|00005f70| 44 46 53 5f 44 69 73 63 | 4f 70 22 2c 30 2c 31 2c |DFS_Disc|Op",0,1,|
|00005f80| 64 69 73 63 61 64 64 72 | 25 2c 53 25 2c 6c 65 6e |discaddr|%,S%,len|
|00005f90| 25 0d 23 a0 05 e1 0d 23 | aa 05 3a 0d 23 b4 20 dd |%.#....#|..:.#. .|
|00005fa0| f2 73 61 76 65 73 65 63 | 74 6f 72 28 74 25 2c 68 |.savesec|tor(t%,h|
|00005fb0| 25 2c 73 25 2c 6c 25 2c | 64 25 29 0d 23 be 23 64 |%,s%,l%,|d%).#.#d|
|00005fc0| 69 73 63 61 64 64 72 25 | 3d 28 28 74 25 2a 32 2b |iscaddr%|=((t%*2+|
|00005fd0| 68 25 29 2a 35 2b 73 25 | 29 2a 31 30 32 34 0d 23 |h%)*5+s%|)*1024.#|
|00005fe0| c8 24 6c 65 6e 25 3d 31 | 30 32 34 2a 6c 25 3a 64 |.$len%=1|024*l%:d|
|00005ff0| 69 73 63 61 64 64 72 25 | 2b 3d 28 64 25 3c 3c 32 |iscaddr%|+=(d%<<2|
|00006000| 39 29 0d 23 d2 29 c8 99 | 22 41 44 46 53 5f 44 69 |9).#.)..|"ADFS_Di|
|00006010| 73 63 4f 70 22 2c 30 2c | 32 2c 64 69 73 63 61 64 |scOp",0,|2,discad|
|00006020| 64 72 25 2c 53 25 2c 6c | 65 6e 25 0d 23 dc 05 e1 |dr%,S%,l|en%.#...|
|00006030| 0d 23 e6 05 3a 0d 23 f0 | 19 dd f2 64 7a 61 70 69 |.#..:.#.|...dzapi|
|00006040| 6e 69 74 3a 66 6f 72 6d | 61 74 25 3d 40 25 0d 23 |nit:form|at%=@%.#|
|00006050| fa 1e f4 20 28 63 29 20 | 4b 65 6e 64 61 6c 6c 20 |... (c) |Kendall |
|00006060| 4b 2e 20 44 6f 77 6e 20 | 31 39 39 31 0d 24 04 20 |K. Down |1991.$. |
|00006070| de 53 25 31 30 32 34 2a | 34 30 2c 46 25 38 2c 6c |.S%1024*|40,F%8,l|
|00006080| 24 28 36 34 29 2c 6e 24 | 28 36 34 29 0d 24 0e 18 |$(64),n$|(64).$..|
|00006090| de 64 73 25 34 2c 74 72 | 25 34 2c 68 64 25 34 2c |.ds%4,tr|%4,hd%4,|
|000060a0| 73 63 25 34 0d 24 18 20 | de 66 69 6e 64 73 74 72 |sc%4.$. |.findstr|
|000060b0| 25 32 30 2c 66 6f 75 6e | 64 25 33 30 2c 66 69 6c |%20,foun|d%30,fil|
|000060c0| 65 25 33 30 0d 24 22 12 | 24 66 6f 75 6e 64 25 3d |e%30.$".|$found%=|
|000060d0| 22 3e 3e 3e 3e 22 0d 24 | 2c 15 24 66 69 6c 65 25 |">>>>".$|,.$file%|
|000060e0| 3d 22 44 7a 61 70 46 69 | 6c 65 22 0d 24 36 27 64 |="DzapFi|le".$6'd|
|000060f0| 72 69 76 65 25 3d 30 3a | 74 72 61 63 6b 25 3d 30 |rive%=0:|track%=0|
|00006100| 3a 68 65 61 64 25 3d 30 | 3a 73 65 63 74 6f 72 25 |:head%=0|:sector%|
|00006110| 3d 30 0d 24 40 27 24 64 | 73 25 3d 22 30 22 3a 24 |=0.$@'$d|s%="0":$|
|00006120| 74 72 25 3d 22 30 22 3a | 24 68 64 25 3d 22 30 22 |tr%="0":|$hd%="0"|
|00006130| 3a 24 73 63 25 3d 22 30 | 22 0d 24 4a 05 e1 0d ff |:$sc%="0|".$J....|
+--------+-------------------------+-------------------------+--------+--------+